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OMO SE HACE 
UN TEST POR 
ORDENADOR 
SOFTWARE 


Gyroscope: una peonza 
mecánica en e/laberinto 
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SOLICITUD DE NUM EROS ATRASADOS 
I SIN EL RECARGO DEL IVA 
 
Oferta válida hasta el 28 de febrero de 1986, 
Deseo recibir en mi domicilio, sin el recargo del IV A, los siguientes 
números atrasados de Microhobby AMSTRAD, al precio de 150 ptas, 
cada uno 
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oU 
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6 
 CIUDAD PROVINCIA 

 
 C. POSTAL TELEFONO PROFESION 
« 
 ¿ERES SUSCRIPTOR DE MICROHOBBY AMSTRAD? N. o DE SUSCRIPTOR (si lo recuerdas) 
'
 1f¡ Marco con una (x) en el casillero correspondiente la forma de pago que más me conviene. 

 
 O Talón bancario adjunto a nombre de HOBBY PRESS, S. A. 
8 g 1 0 Giro Postal a nombre de HOBBY PRESS, S. A., N. o 

 
 D Contra reembolso. 
U'J"" 
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U:;u I 
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Nota: 
Por razones administrativos no podemos admitir solicitu- 
des de envío de números sueltos con pago mediante tarie- 
ta de crédito. Los pedidos contra-reembolso se incremen- 
tarán en 75 ptas. de gastos de envío. 
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Derechas exclusivas 
de la revista 
COMPUTING wlth 
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Se solicitara control OJ D 


Continuamos profundizando en el estudio de las 
variables con subíndice o matrices, 
Aprenderemos un poco más acerca de cómo 
organizar nuestros datos en estructuras coherentes, 
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Serie Oro 


Block Jack es un conocido juego de cartas parecido 
a nuestra «siete y media)), magníficamente simulado en 
este programa, que hace un uso muy háb,l de las 
capacidades gráficas del Amstrad. 


15 Banco de 
Pruebas 
Analizamos una contabilidad adaptada al Plan 
Contable Español preparada para funcionar con una o 
dos unidades de disco, 


Mr. Joystick 18 
Gyroscope es un juego de habilidad en el que 
tenemos que llegar al final de un laberinto constituido 
por imposibles superficies tridimensionales. Todo un 
desafío a tu habilidad. 


¡sta semana un senCillo 
e el ordenador. 
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ProgramAcción 22 
las palabras y caracteres nos entregan todos sus 
secretos de la mano de este artículo, Cómo usar/as con 
sencillez y fiabilidad. 


28 Código 
máquina 
Un byte consta de B bits y el lenguaje máquina tiene 
un completo grupo de instrucciones para manipular/os: 
se conocen como «grupo de instrucciones de 
manipulación de bit, rotacián y desplazamiento». 
Estudiamos las primeras. 
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760 pts. (incluido el /VA) 
PrecIo Canarias, Ceu/a y Melilla 
155 + 10 ptas. sobre/asa aérea 


5 Primera 
plana 


E/lenguaje chino en ordenadores, Novedades 
Apple, 


Primeros 
pasos 
Continuamos profundizando en el estudio de las 
variables con submdice o matrices. 
Ap¡ende,emos un poco más acerca de cámo 
organizar nuestros datos en estructuras coherentes. 


. 


Nfc41 


Dri] 
UG4IDOR 
8r.:l 


 


(=

r:
s
 / (%)

ta 


Serie Oro 


Black Jack es un conocido juego de cartas parecido 
a nuestra «siete y media., magníficamente simulado en 
este programa, que hace un uso muy hábil de las 
capacidades gráficas del Amstrad, 


J5 Banco de 
Pruebas 
Analizamos una contabilidad adaptada al Plan 
Contable Español preparada para funciona' con una o 
dos unidades de disco, 


Mr. Joystick 18 
Gyroscope es un iuego de habilidad en el que 
tenemos que llegar al final de un laberinto constituido 
por imposibles superficies tridimensionales. Todo un 
desafío a tu habilidad, 
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Análisis 21 


Amstrad Análisis estudia esta semana un sencillo 
metodo de crear tests mediante el ordenador, 
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ProgramAcción 22 
las palabras y camcte,es nos entregan todos sus 
secretos de la mano de este artículo. Cómo usar/as con 
sencillez y fiabilidad. 


28 Código 
máquina 
Un byte consta de 8 bits y ellenguaie máquina tiene 
un completo grupo de instrucciones para manipularlos: 
se conocen como «grupo de instrucciones de 
manipulación de bit, rotacián y desplazamiento)), 
Estudiamos las primeras. 
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NOVEDADES 
ApPLE 


( 11 1 
11: 11 


, os ordenadores 
Apple I1 y Mclntosh se verán comple- 
mentados por una interesante gama 
de peritéricos que Apple Cómputer 
acaba de lanzar al mercado. 
Entre ellos destacan la Apple RAM 
Expansion Card de 256 Kbytes, que 
permite aumentar la memoria de los 
Apple 11, I1 + y Ile hasta un máximo 
de un megabyte. Esta ingente canti- 
dad de memoria puede emplearse 
como RAM disc o bien como memo- 
ria de acceso aleatorio normal. En el 
Firmware de la Card exiten las ne- 
c
sarias rutinas de gestión de memo- 
nao 
Otro periférico que acaba de apa- 
recer es un disco de 800 K formatea- 
das para el Apple 11e, formato 3,5 
pulgadas, el mismo que el del Mac. 
Otras máquinas de la serie II necesi- 
tan modificaciones en la ROM para 
poder manipular el disco. 
Los productos que soportan el Uni- 
Disk 3.5 y la tarjeta de ampliación de 
memoria, pueden trabajar con algo 
que Apple ha llamado «Guark Ca- 
talyst 3.0», que no es más que un in- 
terface tipo Maclntosh para el Apple 
11. 


NCR ESPAÑA 


NCR ha incrementado su factura- 
ción en la primera mitad del presen- 
te ejercicio en un 37 por 100. 
Según su director, NCR ha tenido 
y tiene una gran penetración en to- 
dos los sectores informáticos, espe- 
cialmente en lo que respecta a los ca- 
jeros automáticos y al sistema finan- 
ciero 5000. Este último mercado 
constituye la mayor parte de su vo- 
lumen de negocios, 
NCR posee muchos modelos de or- 
denadores; tal vez uno de los más 
conocidos sea el que incorpora dos 
microprocesadores: un Z80 (compa- 
tibilidad CP/M) y un 8088 (compati- 
bilidad I BM). 
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MAS 
COMPATIBLES 
PARA IBM AT 


Bull, primer fabricante francés de 
ordenadores, conocido entre otras 
cosas por sus tarjetas de crédito in- 
teligentes, con un microprocesador 
incluido, lanzará próximamente un 
ordenador, denominado AJAX, 
compatible con ellBM AT, comple- 
tando así a otros modelos que ya po- 
see el fabricante francés, compati- 
bles con el I BM pc. 
El nuevo ordenador posee prácti- 
camente las mismas características 
que el A T: 512 K de RAM, varios mo- 
dos gráficos y el 80286 de I ntel co- 
mo unidad central de proceso y unos 
cuantos extras, como un precio infe- 
rior en un 10 por 100 a I BM, cone- 
xión con otros ordenadores BU LL, 
etc, 
La galaxia de compatibles se ve 
ampliada con un nuevo miembro (ta- 
chín, tachiiiin). 


Base de datos para 
el Tribunal Supremo 


Este venerable organismo contará 
a partir de ahora con una base de 
datos, suponemos que inmensa, con 
toda la jurisprudencia y los datos del 
Tribunal que necesiten ser consulta- 
dos por juristas y demás profesiona- 
les. La conexión se hará entre un or- 
denador del Supremo y la base de 
datos jurídica Datalex. 


· rimera 
plana 


INFORMAT/CA 
EN EL EJERCITO 


Anisa " CTI se han llevado un con- 
trato de 8 millones de pesetas para 
el desar 0110 de un sistema informá- 
tico paro nuestra Armad.. 
Concretamente será el encargado 
del control de configuración (¡tela!) 
del nuevo grupo de combate inte- 
grado por el portaaeronaves «Prín- 
cipe de Asturias» y las fragatas tipo 
FGG. 


EL 
LENGUAJE 
CHINO EN 
ORDENADOR 


L a República Popular China es- 
tá tratando de ponerse rápidamen- 
te al día en lo que respecta a temas 
informáticos, para tratar de alcanzar 
a Occidente lo antes posible. , 
A pesar de que los chinos llevan un 
cierto retraso en lo relativo a orde- 
nadores, han conseguido crear un 
sistema de procesamiento del len- 
guaje chino único en el mundo. 
Creado en la Universidad de Edu- 
cadores de Beijing, permite estable- 
cer la frecuencia de uso de caracte- 
res escritos, editar diccionarios e in- 
vestigar acerca del lenguaje. 
El software del sistema incorpora 
tres bases de datos de caracteres 
auxiliares chinos, archivo indexado 
de palabras e información sobre fra- 
ses y lenguajes. 
Fuentes de International Data 
Corp. informaron que el sistema ha 
sido estudiado a fondo y aprobado 
por más de 60 linguistas y expertos 
en computación. 
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 BLES CON 
SUB/NO/CE (MATRICES 11) 


Las variables con subíndice o matrices han entrado de lleno en 
nuestra «vida informática)}, Han revolucionado nuestro 
cóncepto de variable «sencilla» y nos han proporcionado una 
herramienta muy valiosa para poder agrupar diversos valores 
de un mismo tipo bajo el nombre de una única variable. 


// 


,.11 
I"'¡'I 1 
IIIU_11111,1I1 


n nuestro último encuen- 
tro recibimos una avalancha de conceptos, pa- 
labras nuevas, definiciones, etc, sobre matri- 
ces, dimensiones y subíndices. Nuestra idea es 
que se vayan familiarizando poco a poco con 
este nuevo tipo de variables, entiendan el por- 
qué de su utilización y se adentren con cuida- 
do y atención en el maravilloso mundo de las 
matrices, Para conseguirlo vamos a detener- 
nos minuciosamente en cada uno de los con- 
ceptos expuestos, 
Recordemos lo que era una variable con su- 
bíndice. Es un nombre de una variable senci- 
lla seguida de un índice encerrado entre pa- 
réntesi s. 


conjunto (7) 
será el elemento número siete de la matriz 
«conjunto»; «conjunto» sería el nombre de la 
matriz y 7 el subíndice del elemento. 
Observen que mientras: 
conjunto (7) 
es un elemento de una matriz. 
conjunto 7 
es una variable sencilla y no una variable con 
subíndice, Si nos las encontramos en un mis- 
mo programa que no se nos olvide que son 
variables distintas, aunque ambas contienen 
valores numéricos. 
Del mismo modo: 
grupoS (8) 
sería el elemento 8 de la matriz ((grupo$», Co- 
mo habrán adivinado esta última matriz con- 
tendrá valores alfanuméricos -termina en $, 
Uno de los misterios maravillosos de las ma- 
trices es que los subíndices pueden ser a su vez 
variables, Sería válido asegurar: 
conjunto (elemento) = > 
siempre que anteriormente hayamos dado al- 
gún valor a la variable ((elemento», 
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Los subíndices pueden ser también expresio- 
nes más complejas siempre que su evaluación 
sea un número entero. Podríamos hacer: 
grupos$ (3 * 5) = ((PEPE» 
sin tener ningún tipo de problemas -a menos 
que PEPE se enfade por utilizar su nombre. 
Paro dar valores a todos los elementos de 
una motriz utilizamos generalmente las instruc- 
ciones INPUT o READ repitiendo un número 
fijo de veces un bucle (FOR.., NEXT) o hacién- 
dolo hasta que introduzcamos un valor pre- 
viamente establecido que haga que nos sal- 
gamos del bucle (WHILE.. WEND). Veamos 
lo que decimos con el Programa 1. 


PROGRAMA UNO 


Con lo línea 30 le decimos 01 ordenador el 
número de elementos que queremos tenga la 
motriz «conjunto», 
Las líneas 50 a 80 dan o dichos elementos 
los valores que nosotros metemos por el tecla- 
do. Observemos que la variable ((elementos») 
se utiliza como límite superior de lo variable 
de control del bucle dndice 1» y así nos ase- 
guramos de rellenar el número de elementos 
deseado. 
Las líenas 120 o 140 nos sacan un listado 
con el contenido completo de la matriz. 
Si metemos en la váriable «elementos» 
un 3, los dos bucles FOR,.. NEXT se repetirán 
3 veces cada uno y por lo tonto en el primero 
se nos pedirá que introduzcamos por el tecla- 
do otros tontos números y en el segundo se nos 
imprimirán todos los valores que hayamos me- 
tido, 
Utilicemos ahora este programo para inten- 
tar rellenar con unos determinados valores una 
motriz de 16 elementos. 
Nuestro Amstrad se revelo y nos da un 
mensaje de error: 
Subscript out of range in 80 
¿Qué ha ocurrido? Analice los posos 
que ha seguido. Hemos introducido sin pro- 
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blemas los 10 primeros valores que el orde- 
nador nos ha pedido. A continuación se mete 
el siguiente número que vamos o intentar al- 
macenar. 
Pero en este punto es donde el ordenador 
nos envía el mensaje. Nuestro Amstrad no 
nos permite que una variable tenga como su- 
bíndice un valor mayor que 10. ¡Gran proble- 
ma! 
De todos formas no tenemos por qué preo- 
cuparnos, Poseemos uno herramienta que nos 
va a permitir resolverlo. 
Cuando nos encontremos con la necesidad 
de manejar índices mayores de 10, utilizare- 
mos la instrucción DIM, Mediante ello infor- 
mamos 01 ordenador que reserve en la memo- 
ria espacio suficiente paro contener uno ma- 
triz que tiene más de 10 elementos, Además 
también le decimos el valor máximo del subín- 
dice que va a tener uno de dichos elementos, 



Agregue al programa anterior la línea: 
15 DIM conjunto(16) 


y repita los pasos anteriores. Ahora sía nos ad- 
mitirá 16 valores. 
y si ponemos: 


15 DIM coniunto(1000) 


nos permite rellenar una matriz que tenga 
1,000 elementos. 
Podemos sacar en conclusión que el Ams- 
trad permite trabaiar con arrrays que no es- 
tén DIMensionados siempre que el valor má- 
ximo de los subíndices no sea mayor que 10. 
En caso contrario tendremos que avisarle de 
ello -DIMensionorlos. 
En este programa hemos utilizado dos lIídi- 
ces diferentes para acceder o cada uno de los 
elementos de la lista -«Índice he «índice2». 


Los hemos elegido así arbitrariamente ya que 
al ser bucles FOR... N EXT diferentes y no es- 
tar anidados uno dentro del otro podríamos 
usar una sola variable de control para ambos 
bucles, 
Veamos cómo rellenar una matriz por me- 
dio de las instrucciones WHILE... WEND y 
READ... DATA, 


PROGRAMA DOS 


En lo línea 20 definimos y dimensionamos 
en nuevo arroyo lista que en este caso va a 
ser alfanumérica y a poder contener 100 ele- 
mentos. 
La línea 210 contiene todos los datos que 
queremos meter, El primero es el número de 
los mismos. Lo leemos en la línea 50 y su va- 


p 


.s 


" 


) 


" 


lar lo colocamos en «grupo$ (O)>> -ya ha- 
blaremos sobre él en el subíndice O. Nos sirve 
de momento paro hacer por primera vez el bu- 
cle WHILE...WEND de las líneas 70 o 110, 
En este bucle vamos leyendo las sucesivas 
cadenas que hay en la línea 210 y las alma- 
cenamos en los distintos elementos del arroy 
hasta que encontramos un volar que sea la ca- 
dena vacía. Esta es lo condición de salida del 
bucle: encontrar la cadena vacío en uno de 
los elementos de la matriz. Por eso lo primero 
que hacemos es meter una cadena literal con 
los mismos dígitos que el número de elemen- 
tos en «grupo$ (O)>> y así tenemos ya un va- 
lor distinto de la cadena vacía -recuerde que 
el Amstrad inicializa las listos con el valor 
«»- y se ejecuto por primera vez el bucle 
WHILE... WEND. 
En las líneas 150 a 180 realizamos un proce- 
so semejante paro sacar en pantalla todos los 
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elementos a los que hemos dado algún valor, 
Como subíndice para recorrer los elemen- 
tos que vamos a rellenar utilizamos la varia- 
ble «índice» y la vamos incremantando en las 
líneas 80 y 170 respectivamente. 
Con la línea 200 escribimos el número de 
dutos que hemos dado a dichos elementos. 
Vamos a ver ahora un supuesto práctico, 
Nos han dirigido una encuesta para elegir la 
mejor revista de informática y nos han pro- 
puesto realizar un programa que determine 
el número de votos que obtiene cada revista, 
Cada papeleta va a contener un dígito del 1 
014. Si el voto contiene un lle damos un punto 
a «MicroHobby», si contiene un 2 es un punto 
a «MicroHobby-Cassette». Cuando contenga 
un 3 votamos a «MicroHobby-AMS- 
TRAD» y con un 4 a «Micromanía», 
Le pasamos la bola y le invitamos a que in- 
tente hacer este programa antes de seguir. 
Mientras, nosotros hacemos una pausa. 
¿Lo ha conseguido? ¡Bien! Veamos si lo ha 
pensado de una manera semejante a la nues- 
tra, Una de las soluciones más eficaces al pro- 
blema planteado sería: 
l. Declarar y dimensionar un array cuyos 
elementos contengan los valores de los datos 
recibidos por cada una de las revistas: 


DIM votos(3) 
2. Tomar la viable «revista» como índi- 
ce de la matriz «votoS» dimensionada an, 
teriormente, 
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A partir de aquí podemos proceder a con- 
tar normalmente los votos emitidos para ca- 
da una de las revistas pero no lo vemos muy 
práctico, ¿verdad? 
Mejor, y más útil, es fabricarnos una o va- 
rias líneas de DATA en las que tengamos re- 
gistrados todos los votos emitidos. 
Sería semejante a: 


DATA 1,2,3,3,1,4,3,2,-1 
¿Pero qué hace -1 al final de la línea? T ran- 
quilo, se :0 vamos a explicar. 
El valor -1 colocado al final de la última 
línea de DATAs nos indica sencillamente que 
nuestros votos se acabaron: ya no existen más 
votos y podemos proceder al recuento. No es 
un voto más. 
Nuestro programa va a leer cada uno de 
los votos. Dependiendo del número que lleve 
va a sumar un punto al elemento de la matriz 
que contenga los puntos de la revista utilizan- 
do como índice el número escrito en el papel 
del voto. 
Por ejemplo, el voto es para la revista l. Esto 
implica qué «revista» va a valer 1 y tene- 
mos que sumar un punto a «votos(l)>> -«Mi- 
croHobby»: 
votos(l) = votos(l)+l 
y generalizando, esta última expresión sería: 
votos (revista) = votos (r
vista) + 1 
Obs
rve que esta sentencia de asignación 
es equivalente a la forma en la que incremen- 


tábamos la variable «índice» en el programa 
anterior: 
índice = índice+ 1 
Cuando nos llega el indicador de fin de da- 
tos (-1) detenemos la cuenta de los votos y 
podemos hacer el recuento e imprimir los re, 
sultados. 
Pero no le vamos a hacer rabiar más, Vea 
si su programa coincide con el nuestro, 


PROGRAMA TRES 


En la línea 20 DIMensionamos el array, En 
el desarrollo posterior del programa podrá ob- 
servar que ningún índice es superior a 10 y por 
tanto no será necesario utilizar esta instrucción 
pero creemos que, aunque nada más sea por 
razones de claridad, es muy conveniente usar- 
la siempre, 
El recuento de votos los realizamos con el 
bucle WhILE... WEND de las líneas 60 0100. 
En él leemos los datos de la línea 190 y ano- 
tamos los votos en su lugar correspondiente 
en la línea 80. 
Los resultados los sacamos simplemente con 
instrucciones PRINT en las líneas 110 a 180. 
Aquí hemos vuelto a utilizar otra vez el ele- 
mento con subíndice O -«votos(O)), Esta vez 
lo hemos usado como contador de los votos 
totales emitidos. Por cierto que vamos incre- 
mentando su valor en la línea 70. Pero no es 
esta su única misión. ¡Ya lo verá! 
No olvide que siempre tenemos en nuestras 
manos el elemento (o los elementos si la ma- 
triz es de varias dimensiones) que tiene como 
índice O (recuerde nuestra juguetona mentiri- 
jilla que, sobre el tema, le dijimos la semana 
anterior) y podemos utilizar estos elementos 
para los fines que mejor nos rnrE'dm. Le in- 
sistimos que vamos a procurar ''< IL1S mejo- 
res utilizaciones de los mismos. 
Y ahora una pregunta: ¿Qué valor ten- 
drán todos los elementos de la ma- 
triz? La respuesta es bien sencilla: CERO, ya 
que nuestro Amstrad las inicializa a O aun- 
que nosotros no se lo digamos. Hace algo pa- 
recido a lo que hemos visto que ocurre con los 
arrays de literales solamente que ahora, en 
vez de imicializarlos con la cadena vacía, los 
inicializa con ceros. 
Le proponemos ahora que intente añadir 
una condición al Programa 111 para que no ad- 
mita votos para la revista número 16, por 
ejemplo, ya que no existe, así como registrar 
los votos de las personas que no estén confor- 
mes con las revistas indicadas y sean partida- 
rias del RESTO (mal llamado competencia). 
Tamb:én puede modificar este programa pa- 
ra que además de los votos nos aparezca el 
% de votos de cada una de las revistas redon- 
deando al entero más próximo, 
Bueno, ¡hasta la próxima semana! Intenta- 
remos adentrarle en el uso de variables con 
dos subíndices o matrices de dos dimensiones 
y ¡anímese, que es fácil! 



.. 


PROGRAMA I 


10 REM PROGRAMA 1 
20 CLS 
30 INPUT "NUMERO DE ELEMENTOS: "
el 
ementos 
40 REM DAR VALOR A LOS ELEMENTOS 
50 FOR indicel=l TO elementos 
60 PRINT "VALOR";indicel; 
70 INPUT ":"
valor 
80 conjunto(jndicel)=valor 
90 NEXT indicel 
100 REM LISTADO VALORES 
110 PRINT 
j20 FOR indice2=1 TO elementos 
130 PRINT"CONJUNTO(";indice2; ") ="; 
conjunto(indice2) 
140 NEXT indice'2 
j 50 Pf,I NT 
j60 PRItH"l A MATRI7 TIENE";elemE"-'nto 
s; "ELEMENTClS" 


PROGRAMA 11 


10 RFM PROGRAMA 11 
20 DIM grupo$(100) 
:30 CLS 
40 REM DAR VALOR n LOS EL.EMENTOS 

O READ valor-$ 
60 grupu$(O)
vAlor$ 
70 WHILE qrupo${indice)<>"" 
80 indice:indice+l 
90 READ valor$ 
100 grupo$(indice)=valor$ 
110 WEND 
120 REM LISTADO VALORES 
130 i.ndir.e=l 
140 PRINT 
150 WHILE grupo$(indice)<>"" 
160 PRINT"GRUPO$(";indi(:e; ") =";gru 
po${indice) 
170 indice=indice+l 
180 WEND 
190 PRINT 
200 PRINT"LA MATRIZ TIENE"; VAL (gY-U
 
o${O»;"ELEMENTOS" 
! 210 DATA "6". "PEPE" 
 "RICARDO" 
 "PACO 
l "JESUS", "LUIS", "PEDRO","" 


. 
· rime I 
p I1 15 


PROGRAMA 111 


10 REM PROGRAMA 111 
20 DIM votos(4) 
30 CLS 
40 REM RECUENTO DE VOTOS 
50 READ revista 
60 WHILE revista<>-l 
70 votosCO)=votosCO)+1 
80 votos(revista)=votosCrevista)+1 
90 READ Y"evi. st.a 
100 WFND 
j10 REM IMPRFSION DE RESULTADOS 
120 PRINT 
1:::0 FT
 1 N r "1'1 1 Cr,OHOBl¡Y: " ; vo'l os ( 1 ) ; "VD 
TOS" 
140 pr"l NT" M 1 CROHOBRY-CASSETTE: " ; vot 
os(2);"VOTOS" 
j 50 PR 1 NT "1'1 r CROHOBBY-.(-\MSTR(-\D: " ; voto 
s(3);"VOTOS" 
160 F'RINT"MICr,0I'1ANIA:"; votos (4) ; "VD 
TOS" 
170 PRJNT 
j 80 PRINT"TOTAL ',)OTOS Ef'lITIDOS:" 
 'lO 
to.:: (O) 
j90 DATA j
3
2,4,
,1,2,3,1,3,4,2,
, 
4,3,-1 
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Pontoon es una simulación por ordenadqr del conocido juego 
de cartas del mismo nombre, tan parecido a nuestras 
entrañables «siete y media». 
Se trata de ir almacenando puntuación sin pasar de 21, Y 
batir a la banca, que en este caso es el Amstrad. 


te 


I ordenador nos 
da y se da inicialmente dos cartas; las 
nuestras están ambas boca arriba, 
pero sólo vemos una del ordenador, 
Tenemos dos opciones: o nos plan- 
tamos pulsando la «s» o pedimos 
otra carta mediante la «T», No hay 
límite al número de cartas que pode- 
mos recibir, siempre y cuando la su- 
ma de sus puntuaciones no pase de 
21. 
A todo esto, cada carta vale su nú- 
mero de orden, excepto los reyes, 
que valen 1 O, y los ases, que valen 
1 u 11. 
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VARIABLES MAS 
IMPORTANTES 


X, Y Coordenadas de las cortos. 
e Número de corta (1-13), 
player O=computer , 1 =jugador, 


Cuando nos plantamos, el ordena- 
dor estudia nuestro juego y el suyo, 
y se va echando cartas hasta que nos 
gane o se pase. 
Comenzamos con un capital a 
nuestra disposición de 10, 
El autor del programa ha incluido 
al principio del mismo una curiosa 
opción de autodestrucción. Si quie- 
re saber cómo funciona, ¡salve el 
programa en disco antes! 
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ESTRUCTURA 
DEL PROGR 
 M 


10.60 Lee los valores de los cartas, 
70.135 Dibuja lo pantalla, 
140 Comienzo el bucle principal. 
220 Comienzo lo rutina que rige el 
juego del ordenador. 
260 Rutina del jugador, 
470 Ganadores, 
570 Dibujo cortas. 
870 «Voz» del ordenador. 
940 'Pontaon! 
1030 Se acabó el dinero, 



5 REMec)Amstrdd Semanal 
lO DIM 
ard$(13) 
 packe4
13) 
20 MOnE 1 : BORDER O : INK O
O IN 
f:' t, 7.6 I Nf< 7, 18 : I Nf< 3, 22 
30 
FM Ip8 los 'valores de las carta 
s 
40 FOR n::..l TO 13 :. READ card$en) 
f\1EXT 
50 DAT
 n,2,
,4,5,6,7,8,9,10,J,Q,K 
60 money=10 REM dinero para apos 
tar' 
70 RFM ******* pantalla inicidl *** 
**** 
80 F'EN :? : LOCA1E 15,1 : a$="* F'ONT 
DON *" : GOSUB 870 : GOSUB 920 
85 LOCATE
 1
 15 : F'RINT "instnlccion 


es ?'I 


86 a$=INf::,E.Y$ : IF a$="" 1HEN 86 ELS 
E IF l.EFT'!;eUF'F'ER$ea$) 
 l)<>"Y" THEN 
120 
90 CLS : F'RINT : F'RIN1"EI objeto de 
1 juego es ir sumando las puntuac 
jones de las cartas que recibas ylu 
ego compararlas con las del ordenad 
or- . 11 
95 F'RINT "Si el total es mayor, gan 
dS. F'ero el valor no debe exceder d 
€? 21, Si sLIe:ede, pLlespi er'des. " 
10n F'RtNT "Si sumas 21
 te dan Lln b 
onus":F'RINT"Las teclas de control s 
lm: ":F'RINT"S... F'ara plantarse":F'RI 
NT"T... Para pedir otra carta." 
110 F'RINT:F'RINT"F'ara hacer el jLlego 
mas jnteresantp hay una opcion de 
autodestrue:cion: el programa se bor 
r'ar'a si se te ¿
caba el di nero." 


:MIC 


.r¡10 
xUU 
, . . . 


, ,., J at TU ,. 
e 
. . . . +, 
',... '. 
,',." 
. . . . . . 
7 


u 
6 
l n ,s 


.
 


espaolo 


S erie Oro 


114 L.DCATE 11
23:F'RINT"< F'ulsa una 
t ee: 1 a :>" 
115 l'JH I LE I Nf:::EY$,=" " : WE.ND 
12CJ Cl.S:L.OCATE 7,10 : a$="Auto-dest 
ruc. ON/DFF'" : GOSUB 870 
t3n INF'UT autodestrue:t$ : autodestr 
uct.=UF'PER$(autodestruct$) 
135 a$="Apuesta mini.ma es " : LOCAT 
E 12,18 : GOSUB 870 : F'RINT CHR$e16 
:::.) ;" t" : GOSUB 920 : GOSUB 920 
140 RFM ******r bucle principal *** 
**** 
150 play
rtotal:O : dealertotal=O : 
dealerac8s=0 : playerae:es=O 
160 Cl5 : F'EN 1 : 1 Nf:: 0,4 : BORDER 
4: GOSUB 920 :<,,:\$=" Tienes ":l.OCATE 
1, IO:GOSU8 870:F'RINT CHF,$(16C:);" " 
; mcm ey 
170 ("OSln
 9:"0 : a$:" Cuanto apuesta 
s " : ¡,OCATE 1, 14: GOSUB 870 
18G T NF'l JT h€'t : If: bet -:: 1 OR bet :> 
mon Py THr':f\1 LOrA TE 2 
 18 : a $=" Que';' 
Trat.:"i de> nIIPVO. (\PU(Oste-l " : GOE;LJP 8 
"7n . I (lrl\ n
 '::><=;. t H . (
n H1 1 q(, 
190 Cl S : Ir,u:: e, c.; : HOWJFR u : I UC{) 
TE 1, 2C: : F'Ef\1 2 : F'R I NT" ApL\esL
"; 
" "; CHR$ e 16:;'.) ; bE',t 
200 money=money-bet : LOCATE 31
2 : 
F'RINT CHR$eI63);money 
205 LOCATE 1
'2 : F'RINT "BANCA" : l(J 
CATE 1,17 : F'RINT "JUG{)Dm," 
210 MOVE O
O : DRAW 6C:9
0 : DRAW 63 
9;399 : DRAW 0,399 : DRAW O
O 
220 player=O : start=l : x
15 : y=2 
50 : C;DSLJB 
,70 : RE
1 pri rTlprd Larta 
de la bane:a 
230 x=105 : GOSUR 
70 : REM sey 
Llnd"a car-tC\ de 1 a banci'l 
240 playpr=l : x=15 : y=90 : GOSUB 
570 : x=110 : GOSUB 570 
250 TAGOFF : LOCATE 70
23 : PEN 3 
F'RINT " <S>F'lantarse / <T>Carta" 
260 WHILE playertotal<22 
270 reply$=UF'F'ER$eINKEY$) : IF re
 
ly$="" THEN 270 
280 IF reply$<:>"T" THEN 310 
290 SOUND 1
100
5 : SOUND 2,110,10 
: x=x+90 : GOSUB 570 : REM otra ea 
rta 
300 l-<J[
ND 
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310 WHILE playeraces(>O 
320 IF player-total+l0:>21 THEN play 
er-aces=player-aces-l 
330 IF player-total+l0(22 THEI'I play 
er-aces=player-aces-l : player-total=p 
layer-total+l0 
340 WEND 
345 LOCATE 8
12 : PEN 2 : PRINT pla 
yer-total 
350 IF player-total:>21 THEN LOCATE 1 
7
12 : PRINT "PIERDES! " : SOUN 
D 1
3000
40 : GOTO 510 
360 IF player-total=21 THEN GOSUB 9 
40 : REM pontoon ! 
370 player-=O : x=15: y=250 : c=star- 
tcar-d : s=star-tsuite 
380 TAG : GOSUB 700 : x=105 : REM d 
ibuja la pr-imer-a carta de la banca 
390 WHILE dealer-total < player-total 
400 IF dealer-aces=O OR dealer-total 
=2 THEN 430 
410 IF dealer-total+l0 > 21 THEN de 
aler-aces=dealer-aces-l : pace=pace+l 
420 IF dealer-total+l0 ( 22 THEN de 
aler-total=dealer-total+l0 : pace=pac 
e+l : dealer-aces=dealer-aces-l : GOT 
O 450 
430 GOSUB 920 
440 SOLJND 1
90
5 SOUND 2
70
10 : 
x=x+90 : GOSUB 570 : REM otr-a car-t 


a 
450 IiJEND 
460 IF pace(>O AND dealertotal >21 
AND dealer-aces<>O THEN dealer-total= 
dealer-total-l0 : pace=paLe-l : GOTO 
390 
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465 LOCATE 8
2 : PEN 2 : PRINT de
l 
er-total 
470 REM ******* quien gana? ***t** 
:« 


480 TF clr:>¿d pt.tcd. al ::. ¡..¡lé\yer-tutal {4N 
D dpaler-total ( 27 THEN LOCATE 17
1 
2 : Pf, J I'n "Y(1 GANCJ I I I " 
490 1 F d€-
al p.r'l- ot..,d -: p 1 ayer-totc?l OR 
cJeal er t ot <'\1 ">71 THEN LOCATE 12,12 

 PEN 3 : F'RINT "TU GANAS "; CHR$ (16 
3); bet*2 : mc.r¡py=mcmey+bet*2 

OO IF de<'\ler-tot<'\l = player-total TH 
EN L nr:(\TE 15
 1:' : F'RJNT"* EMPATE * 
" : money=money+bet 
510 IF money < 1 THEN GOTO 1030 
520 FGR suite=O TO 3 : FOR c=1 TO 1 


.." 
" 


530 pack(suite,c)=O : REM n 
lleva bar-aja 
540 I'IEXT ("" : NI: XT sui t
 
;-;50 1.0CATE lB
 23 : PEI'I 1 : PRINT " 
,:' F'Ldsa E'spacio )" 
560 IF INf:::EY$="" THEN 560 ELSE CLS 
: GOTO 140 
570 REM ******* cartdS ******* 
58
 P
N 1 : MOVE x
y-10 : DRAW x,y+ 
1uO DRAW x+75
y+l00 : DRAW x+75
y 
-10 : DRAW x
y-tO : TAG : MOVE x
y+ 
90 


590 
) + 1 
600 
bs 
610 IF suite=1 THEN s=227 
mantes 
620 IF suite
2 THEN s=228 
c?zones 
630 IF sujte=:3 THEN 5=229 
arias 
640 IF rac
(suite,c)=1 THEN 590 
650 IF pack(suitp.,c)=O THEN pack(su 
itE:'
("")::.l 
660 JF ,::'1(¡ IHFN c:arcJvalue=10 ELSE 
C"F.\r-dvallle=c 
670 JF player=1 THEN player-total=pl 
ayer-tot al +canjv,.::tl ue : 1 F r:= t THEI'J P 
layer-
ce
::.playeracps+l 
680 IF pl
ypr
O THEN dealer-total=de 
rilec>rtrJ1al +cardvalue : IF e::: 1 THEN d 
ealerdces=
ealeraces+l 
69G IF start
1 THEN startsuite=s : 
stArtcard=c : star-t=O : RETURI'J 
700 M
VE' x+?,y
95 : PRINT card$(c); 
7tO IF c=10 THEN MOVE x+42,y+8 : PR 
TNT rard$«("");: 
LSE MOVE x+58,y+8 : 
F'r-.:I NT r:. ",ni $ (r: ) ; 
720 TF (
1 THFN MOVE x+32
y+50 
JNT CHR.(s);: RFM ar:e 
730 IF c=2 THEN MOVE x+30,y+40 


suitp=JNT(kNIH4) : c=INT(RND*13 
: REM selpcciona carta al azar 
1 F Sl; i 1" e=-CJ THEN s=226 REM c 1 u 


REM dia 


REM 


cor 


RE!'1 esp 


F'R 


PR 
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INT CHR$(s);: MOVE x+30,y+60 : PRIN 
T CHf,$ ( s) ; 
740 I
 r=3 THFN MOVE x+30,y+70 : PR 
INT CHR$(s);: MOVE x+30,y+50 PRIN 
T CHR$(s);:'MOVE x+30,y+30 : PRJNT 
CHR$ (s); 
750 IF 

4 THEN MOVE x
15,y+70 : GO 
SUR 860 : MOVE x+15,y
30 : GOSUB 86 


o 


76(\ IF (=-5 1HEt
 MQ\.lE :-
+J5,y+70 : (30 
SLJP 8(,0 : I"IOVF :-: 1-1;). ''¡+
O : GOSI m 8h 


o : MO\IE :: +.'
:', y+
'(¡ : r'f,: 1 r.11 (:i-If,'f- (<,-,\ 
 
770 IF c=6 THEN MOVE x+l
,y
7a : GO 
SUB 860 : MOVE x+15,y+50 : GOSUP 86 
o : 1'10VE :-: + 1 
,y+:::.o : GOSUB 8(J() 
780 IF r=7 THEN MOVE x+15,y+70 : 80 
SUB 860 : MOVE x+15,y+50 : GOSUD 86 
o : MOVE x+15,y+30 : GOSUB 860 MO 
VE x+32,y+50 : PRINT CHR$Cs); 
790 IF c=R THEN MOVE x
15,y
70 
SUB 860 : MOVE x+15,y+50 : GOSUe 
o : MOVE x+15,y+32 : GOSUE 860 
VE x+32,y+40 : PRINT CHR$Cs);: 
x+32,y+60: PRINT CHR$(s); 
800 IF c=9 THEN MOVE x+15,y+75 GO 
SUB 860 : MOVE x+15,y+25 : GOSUB 86 
o : MOVE :.: 
 t 5, y+58 : GOSUE 8100 : MO 
VE Y
15,y+42 : GOSUB 860 : MOVE x+J 
2,y+50 : PRINT CHR$(s); 
810 IF c=10 THEN MOVE x+15,y+75 G 
OSUB 860 : MOVE x
15,y+25 : GOSUe 8 
60 : MOVE x+15,y+58 : GOSU8 860 : M 
OVE x+t5,y+42 : GOSUE 860 : MOVE x+ 
32,y+40: PRINT CHR$(s);: MOVE 
+3? 
,y+60 : PRINT CHR$Cs); 
820 JF c=IJ THEN MOVE x
J5,y+4
 : P 
RINT CHR$C1411 ;CHR$(140) ;CHR$(142); 
: MOVE x+20,y+45 : DRAW x+40,y
70 : 
DRAW x+59,y+45 : MOVE x+32,y+55 : 
PRINT CHF\$Cs); 
830 IF c=12 THEN MOVE x+15,y+
7 : P 
RINT CHR$(131);CHR$C131);CHR$(131); 
: MOVE x+15,y+5
 : PRINT CHR$(197); 
CHR$(238);CHR$Ct99);: MOVE x+32,y+7 
o : PF\INT CHR$Cs); 
840 IF c=13 THEN MOVE x+15,y+35 : P 
RINT CHR$(131);CHR$C131);CHR$C131); 
: MOVE x+15,y+50 : PRINT CHR$C20,5); 
CHR$(203);CHR$C203);: MOVE x+32,y+6 
5 : PRINT CHR$Cs); 
850 TAGOFF : RETURN 
860 PRINT CHR$Cs);" ";CHR$Cs);: RET 
URN 
870 REM ***** voz del ordenador *** 
** 
880 FOR l=l TO LENCa$) 
Ca$,t,I); 
890 FOR delay=O TO 30 


GO 
86 
MO 
1'10VE 


F'RINr 1'11D$ 


NEXT cJpldY 


S erie Oro 


900 SOUND 1,20+INTCRND*10),3 
910 NEXT t : RETURN 
920 REM ******* retardo ******* 
930 FOR delay=O TO 700 : N
XT JelAY 
: RETURN 
940 REM ******* pontQon I ******t 
950 LOCATE 13,12 : PEN :::. : F'RII'J r "F 
ONTOON '! BClNUS" ; CHR$ C 16-::,) ; b I:'t. 
960 money=money+bet 
970 FOR loop=l TO 3 
980 FOR n ot e=70 TO :::,0 STEF' --11) : S 
OUND J,note: SOUND L
n()t.p+loop*5,-l 
990 NEXT note: SOUND 1,70 
1000 NEXT loop 
1010 FOR delay=O TO 3000 : NEXl del 
ay 
J020 LOCATE 11,12 : PRINT SPC(25) 
GOSUB 920 : RETUF\N 
t030 RFM ***** sin dinern ***** 
1040 FOR t.==1 T(l :::. : (3n
)lJB 920 : I'IEX 
T 
t050 Cl S : lOCATE 5,1:,) : FkINT"TE' q 
uedastp. sin dinero!!" 
J060 I nCA1F 1,73 : GOSUB 920 
1070 1 F aLltod
stn,lct $="m.l" THEN CAL 
LO: REM ¡:::\c.Ji()
 11 
1080 LOCATE 5,18 : PF;INT"l1lr-o jLlegD 
? y IN" ; : 1 NF'Ul anSWE"r $ 
1085 a
swerS
UPPER$Canswer$) 
1090 I,.JHILF answp.r
<'>"Y" AND an
-wE
ri- 
<:> "I'J": IJJE"ND 
1100 J F <-'11 s,wer !f,::'" N" THEN END 
1110 money = tO: II'If:: O, O: HW: 2, lB: 
GOTO 1:20 


Poro que lus dedos 
no reollcf'{/ ellrobolo duro, M, H, AMS- 
TNAO lo hace por /1. Todos los lisiados que Induyon 
esle legolipo se et1cuenlron o lu dsposiÓon en un co¡- 
selle mensual sollCllonoslo, 
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El mós completo programo de músico creo. 
o o poro el AMSTRAD, Permite crear sonidos, 
eloolOs y convertir tu ordenador en lo me- 
'or 'cojo de músico' P.V.P.: ASSETTE 
1..' I . . . " I 
 


S TEM X 


_o 
¡ Et.
 l t:I..! iJ t "C" 
t - I..f lo: I 
I,
;i t:'J:t:: . 
...-."" J "'1 
: ¡r..Ia. 
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OTROS PROGRAMAS EN STOCK 
I I OFFICE P. oo'. CASS, .200 P s 
P.V.P. DI5, 3.900 pt 
"ORLD CUP FOOTBALL P.V.P. CAss. 1.800 pIS, 
:ATLE FOR t1jIDWAY P,V.P. CA5s. 1.800 pIS. 
. 
IGHTER PILOT P.V.P. CA55. 2.200 pts. 
.URVIVOR P,V,P. CAss, 1.800 P 
OON BUGGY P.V.P. CA55. 1.800 P 
TECHNICIAN TED P.V.P. CAS5. 1.800 p 
RUITY FRANK P.V.P. CASS. 1.800 P 
. ATABAS E P.V,P. CASS, 2.100 P 
OGO TURTLE GRAPHICS P.V.P. CASS. 2.400 P 
AsCOPY y TAsPRINT P.V.P, CAsS. 2,600 pt , 
FONT ED , R . . CASS. 1.900 , 
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Sofisticodo programo de dibujo que permite trotar lo pantalla del AMS- 
TRAD como un sencillo tablero de dibujo. sus resuRodos son ex o etoculo 
res. P,V,P.: CASSETTE 4.500 .ts. DISCO 5.200 .IS. 
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.\ o rogromo que nos traslado 01 , 
.L: \. or' 'o móq'ulno-flipper del mejor cosl , 
':ro Las Vegas, Posibilidad de creación O" 
",lero. puntuaciones, etc. P.V.P.: CASSET 
'1,1 pIS, D
,'" 2.' .,' 'J. 


SYCLONE 2 
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. o sor loS mejores programas de cinto o 
disco yo no es problema. Con Tronsmot '" 
te proceso será fÓGil y sencillo, P,V,P.: DlS. 
CO 2.600 pIS. 


ENVIENOS A MICROBYTE AS. 
P,o Castellana, 179, 1,0 - 28046 Madrid 
Nombre 
Pie Idos 
Dirección 
Población 
D,P, T elélono 
ENVI05 GRA TI5 
JUEGO e D Precio I TOTAL 
I , 
I 
PRECIO TOTAL PESETAS 
Incluyo talón nominalivo O 
Contra.Reembolso O 
Pedidos por teléfono 91 . 4425433 / 44 



CONTAS/L/' J 


Esta semana presentamas en Banto de Pruebas otro programa de tontabílídad, 
adaptado también al Plan Contable Español y que destata fundamentalmente por dos 
tosa;: 
1. Es increíblemente sentillo de usar. 
2. Puede emplearse ton una o dos unidades de disco. 
Para analizarlo, seguiremos manteniendo el mismo enfoque adoptado ton el Placon, sin 
pretender por ello entrar en comparaciones, siempre odiosas y en este taso más, porque 
cada uno de los programas cumple su función dentro del hueco que pretende llenar. 
Sin más preeámbulos, vamos a pasar a describir detalladamente el programa: 


a aplicación de 
Contabilidad, pretende que de una 
manera sencilla tengamos una con- 
tabilidad completa y al día, adapta- 
da al Plan General Contable, y de la 
que se obtiene toda la información 
necesaria para el análisis cortable, 
pudiéndose obtener incluso, ratios y 
porcentajes de los gastos e ingresos, 
sumamente informativos del estado 
contable. 


Equipo necesario 


-AMSTRAD CPC-464 
-MONITOR (F. VERDE O CO- 
LOR) 
-UNA O DOS UNIDADES DE 
DISCO 
-IMPRESORA (OPCIONAL) 
Una vez cargado el programa, 
dos cosas nos pueden suceder, según 
sea la primera vez que utilizamos el 
programa, o no. 
a) Si es la primera vez, entramos 
en el apartado «Proceso de Instala- 
ción», donde seremos interrogados 
sobre el nombre de la empresa, que 
ulitizará el programa para imprimir 
en la cabecera de los listados. Pro- 
cura no equivocarte, ya que no ha- 
brá posibilidad de modificarlo a lo 
largo del programa, 
b) No es la primera vez, el nom- 
bre de la empresa ya está «guarda- 
do» en un archivo, por lo tanto no 
aparecerá más el proceso anterior, 
se entrará directamente en la aplica- 
ción, 


Las funciones del programa de 
Contabilidad están divididas en seis 
apartados, que son: 
1, ASIENTOS CONTABLES 
2, PLAN CONTABLE 
3. LISTADO DE CUENTAS DE 
MA YOR. 
4, BALANCE DE SUMAS Y SAL- 
DOS 
5, CUENTA DE RESULTADOS 
6, CIERRE PERIODICO 


Para escoger una u otra opción uti- 
lizaremos las flechas del cursor (1 tL 
ya continuación pulsaremos la tecla 
'ENTER', dando así paso, a la op- 
ción deseada. 
A esta colección de opciones de- 
nominamos Menú, ya este primero, 
«Menú Principal»; la adopción de un 
determinado proceso, normalmente, 
da paso a otro menú con otra serie 
de opciones. 
Para regresar o salir de un menú 
al anterior (Menú PrincipClIL se pul- 
sará siempre la tecla del ángulo su- 
perior izquierdo del teclado 'ESC', 
utilizada desde el menú principal, 
saldremos de la aplicación de Con- 
tabilidad al sistema operativo, dan- 
do por concluido el trabajo, 


Asientos contables 


En esta opción están recogidos to- 
dos los procesos a realizar con los 
asientos de la Contabilidad, 
Al entrar en este capítulo nos apa- 
recerá en la pantalla, otro menú, con 
los siguientes apartados: 
ENTRADA DE ASIENTOS 
CONSULTA DE ASIENTOS 
LISTADO DEL LIBRO DIARIO 
Y, por supuesto, con la tecla 'ESC' 
salimos de este menú para volver al 


principal, redundando en lo anterior- 
mente expuesto, 
ENTRADA DE ASIENTOS 
Consiste en la grabación de las 
partidas contables, como informa- 
ción de base para la elaboración de 
la totalidad de documentos contables 
que se pueden obtener con este pro- 
grama. 
Los datos que la pantalla nos pide 
son: 
P,No. FECHA CUENTA 
CONCEPTO IMPORTE D/H 
P,No, o Número de Partida es el 
número de orden de los apuntes, que 
el ordenador asigna automáticamen- 
te a cada uno, empezando desde 1, 
FECHA. El primer dato, por tanto, 
que debemos aportar, es la fecha del 
apunte. Esta fecha puede correspon- 
der, o bien a la fecha en que se pro- 
dujo el hecho contable, o bien, a la 
fecha en que se registra el asiento, 
(ya que no tiene por qué ser el mis- 
mo día que pagamos una factura, y 
el día que se los decimos al ordena- 
dor), Una u otra fecha son igualmen- 
te válidas. 
CUENTA. Previamente a la entra- 
da de asientos se ha de INTRODU- 
CIR el PLAN CONTABLE, es decir, 
las cuentas a las que vamos a asig- 
nar las partidas que vamos anotan- 
do. 


,
. .. 


CIII!&I 
I .!. 1[ 
. 1£ , 
CUlI Ii . UIII 
C'u. 11 xe 
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Si no ha sido definida previamen- 
te cuenta alguna, aparecerá en pan- 
talla el mensaje: «NO HAY CUENTAS 
DEFINIDAS», y no se podrán introd
- 
cir asientos tanto en cuanto no realI- 
cemos dicha función. 
CONCEPTO. Descripción de la na- 
turaleza del asiento. Admite todas 
las teclas del ordenador (mayúscu- 
los, minúsculos, números y signos), 
con un total de 12 caracteres como 
máximo para definir el apunte. P. Ej.: 
«Fra.A/123-85», etc. 
IMPORTE. Cantidad que importa 
el asiento. Sólo admite dígitos en un 
total de nueve: 999.999.999; Y el sig- 
no «-» no se deben poner los signos 
de pu
tuación, ya qU,e tras eS,cri
ir la 
cantidad y pulsar ENTER, estos 
aparecen en su sitio. 
D/H. DEBE o HABER, se consigna 
«D» o «H», (en Mayúsculas), según 
deseemos que el asiento sea deudor 
o acreedor. 
CONSULTA DE ASIENTOS 
Listado en pantalla de los asientos, 
discriminados entre dos fechas. 
Se pedirá una fecha, inicial., y otra 
final encuadrando aSI los aSientos a 
cons'ultar en un período de tiempo. 
LISTADO DEL LIBRO DIARIO 
Al igual que el anterior proces?, 
pero esta vez so?r
 el. pa
el
 
I lis- 
tado del libro diana Impnmlra los 
asientos limitados por dos fechas da- 
das, Puisando 'ENTER', se asumirá 
la fecha dada en «Fecha Inicio del 
Listado». 
A continuación, se solicita el núme- 
ro de la primera página. Pulsado 
'ENTER' el listado comenzará con el 
número de página del último diario, 
más uno. 
Un último mensaje aparece en la 
pantalla: «PREPARE LA IMPRESO- 
RA», dándonos así tiempo para en- 
cender la impresora, (que ya de
e- 
ría estar/oL colocar el papel al pnn- 
cipio de un hoja,.etc. Puls
ndo cual- 
quier tecla, comienza el listado. 
Abundando en lo mismo, si pulsas 
'ESe se volverá a la cuestión pre- 
cede
te, o, en su caso al menú. 
I 
I 


. 11 . 1 M 
I10Il rDot : I10Il lIJr:III. 


Plan contable 


Este apartado recoge todas las 
funciones a realizar con el Plan de 
Cuentas, 
Tenemos el siguiente menú: 
ALTA DE CUENTAS 
MODIFICAClON DE CUENTAS 
CONSULTA DE CUENTAS 
LISTADO DEL PLAN CONTABLE 
CLASIFICAClON DE CUENTAS 
Como ya se dijo en el ap<;1rtado de 
Entrada de Asientos, el pnmer pro- 
ceso a realizar con el programa, se- 
rá la definición de las cuentas, es de- 
clr. .. 
ALTAS DE CUENTAS 
Permite la grabación en el archi- 
vo, de todas las cuentas que confor- 
man el Plan. Se deben tener en cuen- 
ta dos condiciones: 
a) Cuentas a grabar han 
e t
ner 
5 dígitos, es decir, se grabaran direc- 
tamente, las subcuentas, pues los 
grupos, subgrupos y cuentas, 
os asu- 
me el programa. Esto permite que 
para cada cuenta tengamos hasta 
100 subcuentas. 
P. Ej.: Cuenta 
Subcuentas: 


430 
43000 
43001 
43002 


Cliente 
Cliente A 
Cliente B 
Cliente C 


'., 


. 


ficar, (recuerde que se utilizan 5 dí- 
gitos), para qu
 el or?enador la bus- 
que en el archivo. SI no la encuen- 
tra, (no ha sido dada de Alta), el cur- 
sar vuelve a la petición de cuenta. 
Por el contrario, si la cuenta existe, 
el título aparece a continuación, y so- 
bre la primera letra, el cursar, para 
poder modificar. 
Se avanza con las flechas del cur- 
sar (
 
) si se quiere mantener al- 
gún caracter. . 
Pulsando 'ESe, se retorna sin gra- 
bar la modificación. Pulsando 'EN- 
TER', el título modificado sustituirá al 
anterior. 
CONSULTA DE CUENTAS 
Listado por pantala de parte o la 
totalidad del Plan Contable, así co- 
mo la suma de DEBE, HACER ySAL- 
DO. b . 
El listado puede obtenerse, o len 
de todas las cuentas, pulsando 'EN- 
TER', al principio del listado, o bien 
se podrán listar las subcuentas de u,n 
determinado grupo (pulsando el nu- 
mero del grupoL o a nivel de subgr,u- 
po (pulsando las dos cifras del mls- 
maL o también a nivel de cuenta 
(tres dígitos) o por supuesto, de ,una 
sola subcuenta, pulsando los CinCO 
dígitos de la misma. 
LISTADO DEL PLAN CONTABLE 
Para tener un listado impreso de 
las cuentas, pero en papel, y sin los 
saldos, únicamente el número de 
cuenta y título. 
Nos pedirá fecha de. edición, pa- 
ra salir impresa en el listado. 
CLASIFICACION DE CUENTAS 
Este proceso debe realizarse for- 
zosamente siempre que se produz- 
can altas en el Plan Contable. De no 
realizase, las cuentas dadas de alta 
después de la última clasific<;1ción, 
o 
podrán ser usadas, como SI no eXIs- 
tieran. 


I 
I 
J 
! 
,\ 


43099 Cliente X 
b) Conveniente ajustarse a las 
cuentas definidas por el Plan Gene- 
ral Contable, dado que el programa 
utiliza este mismo orden para la ela- 
boración del Balance y la cuenta de 
Resultados. 
Cuando se digita un número, de 
cuenta que ya existe en el archivo, 
el mensaje «LA CUENTA nnnnn YA 
EXISTE» nos avisa del hecho, no pu- 
diendo definir cuentas con el mismo 
número. 
El título de la cuenta, tendrá como 
máximo 12 caracteres, de capaci- 
dad, pudiéndose utilizar letras, 
ú- 
meros y signos. El fítulo ha de reflelar 
el sentido o finalidad de la cuenta. 
Pulsando 'Ese se pasa nuevamen- 
te a introducir el número de cuenta, 
si no estamos conformes con él, y 
otro 'ESe provoca la salida del me- 
nú. 
MODIFICACION DE CUENTAS 
Cuando nos percatamos de que el 
título de una cuenta no está bien es- 
crito, o simplemente queremos ca
- 
biar su denominación a otra mas 
exacta recurriremos a este proceso, 
que es 
asi idéntico al anterior. Se r
- 
quiere el número de cuenta a modl- 


Listado de cuentas de 
mayor 
Para obtener el listado de asientos 
de una determinada cuenta y en de- 
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terminada fecha, utilizaremos este 
proceso, en dos opciones diferentes: 


LISTADO POR PANTAllA 
LISTADO POR IMPRESORA 
Como su nombre indico, los dos 
apartados realizan lo mismo función, 
con la salvedad de que el primero 
muestro el resultado en pantalla, 
(para ir confeccionando el libro- 
Mayor), 
Poro ambas opciones, el prólogo 
es idéntico: 
Primero, petición de la cuenta a lis- 
tar, (5 dígitos, cuentas que existan en 
el Plan de cuentas, etc.). 
A continuación, fecha inicial y fe- 
cha final, que ya vimos en el apar- 
tado Consulta de Asientos, paro lis- 
tar sólo aquellos movimientos de un 
período, 
Por último, para la opción de im- 
presora, se solicita la también cono- 
cido, «Fecha de Edición». 


Balance de sumas 
y saldos 
Para la obtención de listado del 
Balance de Sumas y Saldos, en la im- 
presora, 
En este coso no hay ninguno op- 
ción o tomar, tan sólo se requiere la 
«Fecha de Edición». 


Cuenta de resultados 


Documento de análisis de resulta- 
do económico del período. Para su 
cálculo se necesitan algunos datos 
que hemos de aportar, y que según 
éstos, habrá distintas maneras de 
realizarlo, por lo que tampoco el re- 
sultado final será el mismo. 
Estas opciones son: 
APORTANDO STOCK FINAL 
APORTANDO PORCENTAJES 
SOBRE VENTAS 
STOCK FINAl=STOCK INICIAL 


APORTANDO STOCK FINAL 
Eligiendo esto opción, el análisis, 
así como el resultado obteniendo es 
el más correcto de los tres posibles. 
Sabiendo el inventario final (inventa- 
rio = stock = existenciasL el márgen í \ 
bruto obtenido, será el margen real 
que estamos cargando a los produc- 
tos que vendemos, y el resultado, 
exacto. 
APORTANDO EL PORCENTAJE SO- 
BRE VENTAS 
Si lo que conocemos es el margen 
que cargamos sobre los productos, 


: ancO 
prue 


. 


. 


. 


el cálculo se hace a la inversa, sien- 
do entonces el stock final calculado, 
solamente una aproximación" (tén- 
gase en cuenta que aun teniendo un 
margen idéntico para todos los pro- 
ductos que vendemos, se realizan 
descuentos, se pierde mercancía, 
etc.). 
STOCK FINAl=STOCK INICIAL 
Cuando la empresa no tiene stock, 
(o resulta imposible conocerlo), y son 
bastante variables los márgenes apli- 
cados a los productos, o simplemen- 
te se trata de una empresa de servi- 
cios (sin existencias ni márgenesL con 
este proceso se obtiene un resultado 
no muy exacto (si realmente hay exis- 
tenciasL o bastante aproximado si se 
trato de una empresa como la men- 
cionada. 
NOTA: Recuérdese que para la con- 
secución de la Cuenta de Resultados, 
es conveniente que todo los asientos 
a cuentas de ingresos (Grupo 7), sal- 
vo las ventas (Cuentas del Subgrupo 
70), se realicen sobre cuentas del 
Subgrupo 74 (Ingresos Financieros). 


Cierre periódico 
Consiste en lo anulación de todos 
los asientos del disco, pero mante- 
niendo los saldos de las cuentas. De 
esta manera tendremos una capaci- 
dad ilimitada de apuntes en el archivo. 
Es conveniente realizar previamen- 
te una «Copio de Seguridad» del dis- 
co de asientos, para no perderlos, y 
así recurrir a ello cuando sea preci- 
so. Así por ejemplo, si realizamos el 
cierre cada trimestre, utilizaremos 
siempre el mismo disco de trabajo, 
pero tendremos un total de 4 discos 
con los asientos de cada trimestre. 


'CH' DE 
. ROGRAMA 
O.. TAS' DA' 
I--Comercializado por: Indesco!"p. 
Soporte: Disco (una o dos unIdades), 
Sistema operativo: CP/M (una o dos 
unidades), 64 
Compatible: CPC464, CPC6, . 
u.;
¡

!
: 
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MICROHOBBY 
AMSTRAD 
SEMANAL 


LE OFRECE 
AHORA SUS 
PROGRAMAS 
YA 
GRABADOS, 
PARA QUE VD. 
NO TENGA 
QUE 
TECLEARLOS 


Todos los programadores y 
aficionados a la microinformática 
sabemos lo tedioso y propenso a 
errores que resulta el teclear un listado 
de un programa, Para facilitar tu labor 
al máximo y que no tengas que estar 
horas sobre el teclado de tu ordenador 
tratando de descifrar incomprensibles 
mensajes de error, AMSTRAD 
SEMANAL te ofrece cada mes los 
programas publicados de los cuatro 
números correspondientes en una cinta 
de cassette, sólo por 675 ptas. (sin 
más gastos por envío). 


Envianos con la menor 
demora posible, el cupón 
correspondiente. 
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YROSCOPE 


Dotado de una extraña 
energía cinética, el incansable 
mecanismo giroscópico, circula 
por los planos multiformes de 
una construcción espacial, en 
la que el mínimo error de 
trayectoria nos precipita a 
abismos insondables. 


odos conocemos el so- 
berbio juego de Atari, para máqui- 
nas de bares y billares, en el cual di- 
rigimos una bola por pasadizos y pa- 
sillos elevados, en busca de las dis- 
tintas metas que culminan las sucesi- 
vas fases del juego. 
Melbourne House, aprovechando 
la brillante idea de Atari, realiza un 
juego muy parecido, con la salvedad 
de que en vez de dirigir una bola, 
conducimos una peonza. 
Nos aguarda el paisaje geométri- 
co y frío de una ciudad espacial sin 
habitantes, solamente algunos seres 
hostiles se interponen en nuestro ca- 
mino. 
A pesar de todo, nuestro principal 
enemigo somos nosotros mismos. 
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El artilugio mecanlco que dirigi- 
mos, está dotado de una fuerza cen- 
trífuga, que hace bastante difícil el 
control del misma, provocando la sa- 
lida de la ruta que debemos seguir. 
Cualquier salida de ésta es fatal. 
Los planos horizontales que cons- 
tituyen el terreno por el que debemos 
circular, están bordeados por inson- 
dables abismos por los que cae nues- 
tra peonza. 
Nuestra único objetiva, es superar 
el mayor número de fases posibles, 
incrementando de esta manera nues- 
tra marcador de puntos. 
La dificultad de cada recorrido, 
aumenta progresivamente, según se 
van superando sucesivas fases. 
Cosa que incita a superar panta- 
lla por pantalla, con el único propó- 
sito de saber cómo es la siguiente y 
las sorpresas que nos depara. 
La conducción del aparato giros- 
cópico, se puede realizar mediante 
joystick o teclado, siendo este último 
el que permite tener mayor control 
de la dirección. 
El joystick, por muy buena que sea 
para juegos de acción trepidante, no 
es el idóneo en aquéllos en los que 
la precisión y la delicadeza son pie- 
zas clave. 
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M r. Joystick 


Utilizando el teclado, se puede 
graduar la inercia hacia cierta direc- 
ción. Con leves toques o con enérgi- 
cas pulsaciones de tecla, podemos 
obtener movimientos suaves o brus- 
cos cambios de dirección. 
Las direcciones de movimiento a 
las que obedece el giroscópico, son 
las clásicas; arriba, abajo, izquierda 
y derecha, pero éstas no son exac- 
tamente las direcciones en las que 
nos tenemos que mover. 
Los planos de circulación, general- 
mente se encuentran en posición 
oblicua a las direcciones indicadas 
anteriormente. Razón por la cual, 
caer por los bordes se hace dema- 
siado frecuente, 
Una técnica muy útil para superar 
este problema, es pulsar simultánea- 
mente dos teclas. Si queremos mo- 
vernos en la dirección que va hacia 
el borde superior izquierdo de la 
pantalla, basta con pulsar a la vez 
las teclas arriba e izquierda, cosa 
que con el joystick sería imposible, 
La parte más vistosa del juego, son 
los gráficos que constituyen las su- 
perficies por las que circula nuestro 
artilugio, siendo el mayor atractivo 
del juego. 
Están realizadas con unos gráficos 
en tres dimensiones, que simulan per- 
fectamente la inclinación de los dis- 
tintos planos, diferenciando clara- 
mente las zonas horizontales de 
aquellos planos que tienen una cier- 
ta pendiente. 
Para conseguir este efecto, se ha 
recurrido a la utilización de una tra- 
ma cuadriculada sobre las zonas ho- 
rizontales y demás planos con pen- 
diente, mientras que los planos ver- 
ticales están tratados solamente con 
rayado vertical y distinto color de 
fondo, acentuando de esta manera 
la diferencia entre ambos. 
La utilización de esta técnica per- 
mite un efecto tridimensional muy 
real, creando una auténtica sensa- 
ción de volumen. 
Un juego, que como su antecesor 
de las máquinas de bares y billares 
es totalmente adictivo, llegando a 
constituir una verdadera obsesión 
pasar a la siguiente pantalla, 
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la sensacion de una máquina de millón real. 

"Poo lC''''o) 
1. 9 00 l"'sco) 
1.9 


I 


""I
A ..
 J 


, \ / 
...... ' ,. 
, ' , 


'1 1 


"- ,/ ¡¡ 
1 I 
",% " 

 I ,
"\.. / 
\.1/. .- 
, '1 , 


. ." 
, _ _ r 

;! 
¿ 
"/ 464 
· illll!]millrn : i2 : 


A 


ACTIVIDADES COMERCIALES ELECTRONICAS, S.A. 
Tarragona, 110, Tel. 325 1058' 08015 Barcelona, Telex 93133 AC EE E 
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Cómo realizar 
un progr.ma test 


1 


n álisis 


Los ordenadores sirven para muchas cosas: de acuerdo. 
Una de ellas, curiosa y útil, os la presentamos en Amstrad análisis esta semana. Se 
trata de un programa muy sencillo que permite implementar los típicos test (carnet de 
conducir) en los que se plantean 4 respuestas posibles a una pregunta y sólo una de 
ellas es cierta. Como lo importante es la idea, las preguntas y respuestas están en forma 
de DA TAs, pero una aplicación más realista requeriría que el usuario introdujera 
preguntas, respuestas y cuál es la correcta mediante INPUTs y archivar todo eso en 
fichero de disco, que el programa principal podría posteriormente utilizar siempre. 
De todas maneras, el método sería más o menos así: 


10-30 Título del programa, 
40-50 Número de preguntas y dimensio- 
nado de las matrices que guardan las pregun- 
tas (preguntas), las respuestas correctas 
(respuesta$), las respuestas al azar incorrec- 
tas (aleatoria$) y los números que indicon cuál 
de las 4 respuestas que aparecerán en pan- 
talla es lo válido (número). 
60 Borrar pantalla y llamar o lo subruti- 
no que introduce datos en las matrices. 
80 Bucle principal sin fin. Uno vez más, nos 
aprovechamos de que lo variable «fin» siem- 
pre será cero y lo condición del WHILE será 
siempre falso. 
90 Imprime el test en pantalla. 
100 Pide la respuesto mediante un INPUT, 
No se comprueban errores; se supone que do- 
remos un numera dentro de rango. 
110 Se compruebo la validez de lo res- 
puesta, comparando el número respondido 
con el valor de lo matriz de respuestas acer- 
tados número(x). 
120 Repetición de lo jugado. 
130 Fin del programa. 
140-120 Introduce valores en las matri- 
ces mediante la orden REAO, No merece ma- 
yor comentario. 
230 Cálculo de lo pregunto, X varío de 1 
a 5, a MAXNUM. 
250-280 coloco lo respuesto correcta en 
el lugar adecuado comprobando cuándo «or- 
den») es igualo número(x). Recordemos que 
en esto matriz se almacenaban los números 
que corresponden 01 lugar correcto donde 
aparecerá la respuesta válido y hay uno co- 
rrespondencia biunívoco entre esto matriz y 
respuesta$(x). Si el número no concuerdo, se 
elige al azor uno respuesto falsa, de «despiste», 
300-320 Respuestos correctas. 
340-370 Respuestos de «despiste» que 
se escogen 01 azor. 


. 
 
" 


) REH ...t....*........ 
20 REH * PROGR
H
 TEST * 
30 REM .......ti'..'.... 
40 HA)CNUM.
 

o DIM pr.Qunt.a.$ CMAXNUM) ,r..pu 
esta" (MAXNUM) ,1I1ei\tarl aS cMAXNU 
""4) ,numero(MAXNUM) 
60 Cl S: GOSUS 140: REM . lnlcl al 
lzillr- * 
70 RFM * bucle prlncipilll * 
ea WHILE NOT Tin 
90 G08UEc 220 
100 INPUT Cual es le. ,....pueat. 
(1-4) 'J num"'e
p 
110 IF numresp< )numero (>1) THEN 
PRINT"Error. La re'!opuI!I'st.. corr- 
ecta ...: "; re!Spue'!.t&. (x) EL SE 
F'RINT 'correcto" 
120 WFND 
130 ENO 
140 RFM *.lnlclal1zar m
tr(ce5 
* 
150 FOR n-l TO MAXNUM 
160 READ proQunt.....(n) ,rIlitSpU9'6t 
8$(n) ,num4!roCn) 
170 NEXT n 
leO FQR 1-1 TO MAXNUH*4 
190 READ .1.
torla",{l) 
200 NEXT 1 
210 RETURN 


r "',¡' .: ,U I 
.'"' 


e-."" , 
,.
¡¡... 


POfOqvtluJáMoi 
110'''''\''' e/¡,.ba,tl,""o. hI.H.MIS, 
TRAO lo """ pOi 6. Todo, /" "/cd,, 1/<1' inclLrfo, 
e$1efogalfpoietfICt.'efJIt'OJI o frJdj

t1ItHI(Of 
iefferremool, iolKl
(J(losl(). 


220 REM * lmprimlr test * 
230 }ol-INT(1+RND CUiMAXNUM) 
240 PRINT 'dltl'l Lln' IpreQunt._ 
bd¡"s" 
250 FOR or d!!'ll= 1 TO 4 
260 y"INTC1+RND Cl)*20) 
270 IF orden num ro ()I) THEN PR 
INT orden:SPC(2); re.pu .t..,,(x 
) EL SE FRINT ordlinJSPC(2) ;alea 
tor1e.t. Cy) 
2AO NEXT ord
n 
290 RE TURN 
zoo RF:H . rospuest.. correct.. 
* 
:HO DATA nombr. de flor,ro..,3 
. elemento qUlmlco, V&ne.dlo, 1 
320 DATA per
OIHUe hl'!otorlco,h 
itler,3.,p09.15 "ntiQuo,eQlpto,4, 
a'Vlon amprican.J,hurric""ne,l 
330 REM * rllit pUIIit t.... a19
tDri. 
. * 
340 OATA ....gmgonto,r.:zon,11n9., 
terrQ,za,pe'!oo 
350 DATA ce.siII,hombre,fe112..'Vl 
on,tI'Ierlu:z,ea 
360 DATA azull'VlI'rde,rojo,
tI'Il'''l 
11o,neon / 
3.70 DATA dat"baae.cAll!f'do!lrio.b 
otell", 11 bro. proQI"'.m. 


" 


MIOOH08BY AMSTRAD 2' 



EL AMSTRAD 
y LAS CADENAS 


J.J. MARTIN 


Dos son los tipos de variables que podemos encontrar en un 
programa basic, variables numéricas y alfanuméricas o 
literales. En esta ocasión vamos a ocuparnos de las 
alfanuméricas, así como de todas las instrucciones que se 
relacionan de forma directa, con el tratamiento de ellas. 


i la versión de Ba- 
sic que utiliza CPC (Locomotiver es 
capaz de provocar el encantamien- 
to de cualquier Basic-adicto, el tra- 
tamiento que de las cadenas alfanu- 
méricas realiza, no podría por me- 
nos, que sorprendernos agradable- 
mente, ante su versatilidad y poten- 
cia de uso. Comenzemos dando unos, 
detalles en el uso general de las va- 
riables alfanuméricas, para poste- 
riormente acabar por sumerginos de 
lleno en el tratamiento de éstas. 


¿Cómo se usan? 
El uso de una variable alfanumé- 
rica debe ser siempre advertido al 
procesador de nuestra máquina. Así, 
si ejecutamos x = "palabra", obten- 
dremos inmediatamente una deten- 
ción con el informe "TYPE MIS. 
MACHT". Lo que viene a significar 
que el tipo de variable que espera- 
ba, numérico en este caso, no coin- 
cide con el recibido, alfanumérico. 
Dos son las formas que tenemos que 
realizar esta advertencia. La prime- 
ra, seguramente será la que más use, 
así como lo que más se encuentre en 
otros programas, consiste en colocar 
tras el nombre de la variable el sig- 
no $. 
Ahora si hiciésemos x$ = "pala. 
bra", no obtendríamos queja algu- 
na de nuestro fiel cpc. Observe que 
siempre que hagamos uso de una ca- 
dena alfanumérica, ésta deberá ir 
encerrada entre comillas, salvo en el 
caso de las sentencias REM, en las 
que puede omitirlas. Si suprimiése- 
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mos éstas, el ordenador intentaría 
encontrar una variable con ese nom- 
bre. Por ejemplo: 
10 PALABRA=34 
20 PRINT PALABRA 
Nos daría como resultado en pan- 
talla 34. Mientras que: 
10 PALABRA=34 
20 PRINT "PALABRA" 
Daría como resultado PALABRA. 
La segunda forma de marcar una 
variable con la etiqueta de literal, 
consiste en hacer una declaración 
previa mediante la instrucción 
DEFSTR, Haciendo uso de esta orden 
podemos suprimir la $. Así, sí ejecu- 
tamos: 
DEFSTRS X 
provocamos que todas las variables 
que empiezen por X o x, sean trata- 
das como variable literal. Así, des- 
pués de esta declaración: 
x = " PALABRA" 
sería perfectamente válido. El único 
problema, ahora, es que no podrá 
utilizar como variable numérica, nin- 
gún nombre que comience por x o X. 
Existe una forma más sofisticado de 
usar esta orden, que consiste en uti- 
lizar dos letras separadas por un 
guión. Por ejemplo: 
DEFSTRS D-L 
provoca que todas las variables cu- 
yos nombres comi
ncen por una le- 
tra comprendida entre la D y la L, 
sean tratadas como variables litera- 
les. 
Mi consejo, es que, por lo menos 
al principio, empleé el sistema de eti- 
quetar con $, lo que le facilitará la 
comprensión del programa, con un 
simple vistazo. 
Lo último importante que puede 
decirse sobre este tipo de variables, 
es que el número máximo de carac- 
teres que pueden albergar es de 
255, el famoso número mágico que 
siempre ronda a nuestro alrededor 
por ser el mayor que puede conte- 
ner una posición de memoria. 
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Instrucciones de manejo 
de cadenas 


El grupo de instrucciones que se re- 
lacionan con el tratamiento de varia- 
bles literales son: 


,/ 


DEFSTRS INSTRS 
LEFT$ LOWER 
MID$ RIGTH$ 
STR$ STRING$ 
U PPER$ VAL 
SPACE$ LEN 
y además de éstas, las operacio- 
nes +, -, <, >, < >, =, pueden 
también ser usadas de un modo pa- 
recido a como se emplean con los 
números. 
Para explicar el significado que 
dentro del lenguaje Basic tienen es- 
tas palabras, realizaremos un pro- 
grama que nos ayudará a su com- 
prensión. Siéntese delante de su or- 
denador y enciéndalo. 
Comenzamos. 


El programa 
del ahorcado 


El programa q
e vamos a realizar 
se basa en el conocido juego del 
ahorcado. Si no lo conoce, su des- 
cripción es muy sencilla. Un jugador 
piensa una palabra e informa al otro 
de su longitud mediante guiones, que 
deberá ir rellenando a medida que 
el oponente le vaya comunicando le- 
tras. De todos modos teclee el pro- 
grama del cual le damos, al final del 
artículo, el listado completo, y úselo 
antes de intentar entender su lectu- 


ra. 


10 REM *EL AHORCADO* 
20 REM * JJ MARTIN para MICRO- 
HOBBY AMSTRAD* 
30 REM * EL AHORCADO* 
40 MODE O 
Mediante esta orden, fijamos el ta- 
maño de las letras al máximo dispo- 
nible. 
50 a$ = JI AHORCADO": 
b$=SPACE$ (15) 
Cargamos la variable a$ con la 
palabra ahorcado, observe cómo 
etiquetamos la variable con $ y có- 
mo la palabra AHORCADO va en- 
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tre comillas. El uso de este literal se 
comprenderá más adelante. La se- 
gunda asignación provoca la carga 
de la variable b$ con 15 espacios, 
mediante el uso de la función 
SPACE$. Esta nos servirá posterior- 
mente para borrar un mensaje apa- 
recido '3n pantalla. 
60 errores = O 
Esta variable numérica llevará la 
cuenta de los errores cometidos. 
70 INPUT palabra$ 
Mediante esta línea, detenemos la 
ejecución del programa hasta que 
sea introducida la palabra que nues- 
tro contrincante debe buscar. 
80 CLS 
90 palabras$ = U PPER$ (pa/abras$) 
Aquí encontramos una de las ins- 
trucciones de nuestro estudio 
U PPER$. Esta función transforma la 
variable alfanumérica encerrada en- 
tre paréntesis por la misma cadena, 
sustituyendo las letras minúsculas que 
encuentre por letras mayúsculas, Los 
caracteres que contenga la variable 
que no sean letras minúsculas no se- 
rán modificados. La función inversa 
de UPPER$ es LOWER$ que realiza 
la misma operación, pero, sustitu- 
yendo las mayúsculas por minúscu- 
las. 
La utilidad que en nuestro progra- 
ma vamos a dar a esta función con- 
siste en asegurarnos que vamos a 
comparar siempre mayúsculas. Ten- 
ga en cuenta que para el ordenador 
Jl a " es distinto de 
'AJllo cual com- 
portaría un verdadero problema, a 
la hora de intentar hallar la solución. 
Ya que significaría, tener que averi- 
guar no sólo la palabra, sino con qué 
letras, mayúsculas o minúsculas, fue 
escrita. 
100 solución$ = palabra$ 
110 Ion = LEN (palabra$) 
En la línea 100 cargamos 
solución$ con el contenido de pala- 
bra. Observe en este caso la ausen- 
cia de comillas. La razón de crear es- 
ta nueva variable es que la variable 
palabra$ la vamos a modificar du- 
rante la ejecución y hemos de asegu- 
rarnos de no perder la palabra bus- 
cada. 
En la línea 110 nos encontramos 
con una nueva función, LEN su uso 
es muy simple, nos da la longitud de 
la variable encerrada entre parénte- 
sis. Observe que LEN (pa/abra$) no 
es 8, es decir, la longitud de Jlpal a _ 
bra$", si no que es la longitud de la 
cadena que alberga la variable cu- 
yo nombre es palabra$. También po- 
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dríamos hacer LEN ("p%bra$"), en 
este caso sí obtendríamos 8 como re- 
sultado, la explicación es que "pa- 
labra$" no es considerada como el 
nombre de una variable, sino como 
una cadena alfanumérica, por ir en- 
cerrado entre comillas. 
120trabajo$=STRING$ (Ion, "_") 
La función STRING genera una ca- 
dena alfanumérica de un caracter, el 
encerrado entre comillas, repetido 
tantas veces como indique el núme- 
ro que lo acompaña. Así STRING$ 
(lO, "*") nos daría como resultado 


"**********,, 


En nuestro programa creamos la 
variable trabajoS de longi-tud igual 
a la de palabra$ y formada por la 
repetición de "-". En esta variable 
iremos colocando las letras que va- 
yamos acertando. 
130 LOCATE 8,20: PRINT trabajoS 
140 I F trabajoS = solución$ TH EN 
GOTa 350 
Escribimos trabajoS. Por el mo- 
mento sólo es una cadena de guio- 
nes. En la línea 140 comparamos 
trabajo$ con solución$ y si es igual 
enviamos la ejecución a la línea 350 
en la que haremos notar que se ha 
acertado la palabra. 
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145 LOCATE 1,23: PRINT "PULSE 
UNA TECLA" 
150 IF INKE$< >"" 
THEN GOTa 150 
160 letraS = IN KEY$ 
170 I F letraS ="" TH EN GOTa 160 
180 letra$ = U PPER$ (Ietra$) 
185 LOCATE 1,23: PRINT b$ 
185 LOCATE 1,23: PRINT"" 
Mediante estas seis líneas hacemos 
una captura de datos, la tecla pulsa- 
da es leída en la línea 150, apunta- 
da en la variable letra$ mediante la 
línea 160, y transformada en mayús- 
cula por la sentencia U PPER$ de la 
línea 180. La línea 150 es un peque- 
ño truco que simula la instrucción 
CLEAR INPUT sólo accesible para los 
poseedores del 664. La finalidad de 
ésta es obligarnos a levantar esto úl- 
timo no se preocupe, hoy no es el te- 
ma que nos atañe, en un próximo ar- 
tículo hablaremos de ello con más 
detalle. 
190 dichas$ = dichas$ + 
"-" + letra$ 
200 LOCATE 1,4: PRINTdicha$ 
Creamos una nueva variable, la 
variable dichaS, en ésta se irán 
apuntando las letras que se van pul- 
sando. Observe con suma atención 
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la curiosa suma. Lo primero que pue- 
de destacarse es que estamos suman- 
do cadenas alfanuméricas. Esto no 
debe asustarle, la definición de esta 
operación es tan sencilla como pue- 
da estar imaginando, un ejemplo se- 
rá suficiente, IJ ABC" + IJDEF" + IJGH" 
nos daría como resultado la cadena 
IJABCDEFGH". La segunda sorpresa 
que podemos llevamos es la estraña 
igualdad: dichaS = dichaS + u _u + 
letraS. ¿Cómo algo puede ser igual 
a ese mismo algo más otra cosa? El 
motivo de nuestra extrañeza se en- 
cuentra en considerar esto como una 
igualdad, consideración más que jus- 
tificada por el empleo del =. Real- 
mente estas dos barras horizontales 
no representan en este caso una 
igualdad, sino una asignación, En los 
principios del Sasic era necesario po- 
ner LET lo cual permitía una diferen- 
ciación evidente entre la igualdad y 
la asignación, después, con el uso, se 
modificó y el empleo de LET quedó 
como algo puramente opcional y 
condenado a desaparecer, Lo que 
hacemos es cargar la variable 
dichasS con lo que era dichasS más 
el signo u_u más letraS, que recor- 
demos, contenía la última tecla pul- 
sada. Mediante la instrucción de la 
línea 200 escribimos en pantalla las 
letras que llevamos dichas. 
210 posi=INSTR (7, palabra$, le- 
traS) 
220 IF posi=O THEN GOTa 290 
En la línea 210 nos encontramos 
con una nueva instrucción, La misión 
de ésta es informamos sobre sí una 
cadena alfanumérica se encuentra 
contenida en otra. El primer núme- 
ro encerrado en el paréntesis da el 
número de caracter a partir del cual 
vamos a comparar en la cadena bus- 
cada. La primera cadena es en la 
que se busca y la segunda lo que hay 
que buscar. El resultado de esta fun- 
ción es numérico. O en el caso de 
que no se halle la cadena buscada 
dentro de la cadena en la que se bus- 
ca, y un número mayor que O si el 
resultado de la búsqueda fuese po- 
sitivo. Además en este último caso el 
número nos va a señalar el caracter 
a partir del cual aparece la cadena 
buscada en la que se busca. Un 
ejemplo resultará clarificador. INSTR 
(1, lJabcdabf lJ , "ab") será igual al 
e INSTR (3, uabcdabfu, Uab") será 
igual a 5 nótese que en este último 
caso comenzamos a buscar a partir 
de IJ c ", como consecuencia del 3 ini- 
cial. 
Pero regresemos a nuestro progra- 
ma. Ya se habrá dado cuenta que 


mediante esta función, averiguamos 
si la letra que da el que intenta solu- 
cionar el acertijo se encuentra en la 
solución. Si llevamos esto al término 
de nuestras variables tendríamos si 
letr.JS se encuentra contenida en pa- 
labraS. Además, no sólo eso, sino 
que sabemos en qué posición de pa- 
labraS se encuentra letraS, esta po- 
sición la guardamos en otra variable 
numérica que llamaremos posi. 
Mediante la siguiente línea de 
nuestro programa separaremos dos 
casos. Que posi sea igual a O, es de- 
cir, la letra no se encuentra en la pa- 
labra, en este caso enviaremos la 
ejecución a la subrutina lJerrores", 
para anotar el error. Y en el caso de 
que posi sea distinto de O continúa 
la ejecución en la línea: 
230 MI OS (trabajo$, posi, 7) = letraS 
240 MI OS (palabra$, posi, 7) = u * u 
Tratemos de comprender el signi- 
ficado de esta instrucción así como la 
misión que tiene en nuestro progra- 
ma. 
La orden MI OS lo que hace es co- 
ger la primera cadena del parénte- 
sis y sustituye desde el carácter que 
indica el primer número, tantos ca- 
racteres como indica el segundo, por 
la cadena que se encuentra tras el 
igual. Nuevamente recurrimos a un 
ejemplo para esclarecer esto. 
Supongamos que 
AS = "federico", entonces M I OS 
(AS, 3, 2) = u pa u transforma el con- 
tenido de AS por ufeparico". 
La sentencia MI OS es quizá la úni- 
ca palabra del Sasic Locomotive que 
puede utilizarse como orden y como 
función, al final del artículo hablare- 
mos de la diferencia de estos dos tér- 
minos, así como el empleo de ésta 
como función. 
En nuestro programa gracias a es- 
ta instrucción, en la línea 230 cam- 
biamos un guión de trabajoS por la 
letra que se halla acertado, y me- 
diante la línea 240 tachamos de pa- 
labraS la letra encontrada, sustitu- 
yéndola por un IJ*", 
Simulemos la primera jugada su- 
poniendo que la palabra buscada 
sea H EL! PU ERTO, en un principio 
tendríamos: 
palabraS = "H EL! PU ERTO" 
t b . S u u 
ra 010 = ---------- 
Ahora si hubiésemos elegido la le- 
tra up u para ver si se encuentra en 
la palabra buscada, estas dos varia- 
bles quedarían del siguiente modo: 
pa!abra,
=uHEL!*UERTO" u 
trabajoS = ----P----- 
El motivo de tachar de la palabra 
la letra encontrada es penalizar las 
repeticiones. 
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250 LOCATE 8,20: PRINT trabajoS 
260 posi = instr (1, palabraS, letraS) 
270 IF po si < > 
O THEN GOTa 230 
280 GOTa 130 
En la primera de estas líneas escri- 
bimos en un lugar de la pantalla la 
variable trabajoS. Gracias a ésta ire- 
mos viendo como va evolucionando 
nuestra palabra hacia la solución. 
La línea 260 ya no debe ser ningún 
misterio para usted, aunque quizá sí 
lo sea su misión. La razón de volver 
a ponerlo estriba en que la palabra 
buscada puede contener alguna le- 
tra repetida, por lo que volvemos a 
mirar si existe otra letra, después de 
haber borrado la primera encontra- 
da. En el caso de que exista otra le- 
tra enviamos la ejecución a la línea 
230 para que se repita todo el pro- 
ceso descrito anteriormente. 
En el caso de que no existan más 
letras iguales a la seleccionada en- 
viamos la ejecución, mediante el 
GOTa 130 de la línea 280 a la línea 
130, para que de este modo se nos 
vuelva a pedir otra letra. 
Sien ya casi tenemos terminado 
nuestro programa, ahora usted re- 
cordará que en la línea 220 si la le- 
tra seleccionada no se encontraba en 
la palabra buscada, enviábamos la 
ejecución a la línea 290 donde ten- 
dremos que penalizar este error. 
Realizemos esta subrutina. 
290 R EM = = la letra no está en la 
palabra = = 
300 errores = errores + 1 
310 falloS = LEFTS (0$, errores) 
320 LOCA TE 1,1: PRINT fallo$ 


Nuevamente nos encontramos con 
otra de las instrucciones de nuestra 
lista. Pero no nos adelantemos. En la 
línea 300 sumamos 1 a la cuenta de 
los errores. Recuerde que en este ca- 
so = es una asignación, errores que- 
da cargado con lo que era errores 
más 1. 
Veamos cuál es el significado de la 
instrucción de la línea 310, LEFTS. Lo 
que hace esta función es coger de la 
cadena del paréntesis tantos carac- 
teres comenzando desde la izquier- 
da, como indique el número que se 
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encuentra como segundo miembro 
del paréntesis. Así LEFT$ ("12345", 
3L daría como resultado "123". 
Existe también otra función dual a és- 
ta, RIGTH$, que realiza lo mismo, 
salvo que comienza a contar por la 
derecha. 
Volviendo a nuestro programa, re- 
cuerde que a$ era igual a "AHOR- 
CADO". Luego la línea 310 lo que 
hará será ir cargando la variable 
fallo$ con" A" en el primer error co- 
metido, "AH" en el segundo, "AHO" 
en el tercero, y así hasta el octavo en 
el que tendremos fallo$ =" AHOR- 
CADO", con lo que el juego habrá 
finalizado sin ser hallada la solución. 
Detención que provocaremos gra- 
cias a la siguiente línea. 
330 I F fallo$ = "AHORCADO" 
TEHN STOP 
Ahora si el juego aún no ha termi- 
nado, sólo son permitidos ocho fa- 
llos, observe que puede fácilmente 
modificar este número cambiando la 
palabra ahorcado por otra más cor- 
ta¡ a pesar de haber cometido un 
error, deberemos enviar la ejecución 
del programa a la línea 145 para 
que se nos solicite nuevamente una 
letra. 
340 GOTO 145 
y ya para terminar hagamos la ru- 
tina que nos informará de que la pa- 
labra ha sido terminada y por tanto 
encontrada. 
350 REM---Ia palabra es 
encontrada--- 
360 CLS: LOCATE 5,9: PRINT "MUY 
BIEN" 
370 END 
Recordará que en la línea 140 si 
trabajoS = solución$ la ejecución del 
programa era enviada a la línea 
350, A partir de ésta borramos la 
pantalla gracias al CLS de la línea 
360, y escribimos en un lugar de la 
pantalla "MUY BIEN", 
El resto es labor suya: siéntese de- 
lante de su CPC y recuerde que la 
programación es como el ajedrez, 
por mucho que aprenda a mover las 
piezas no aprenderá a jugar mien- 
tras no juegue. Anímese y modifique 
el programa con todo lo aprendido 
en números anteriores, ventanas y 
gráficos pueden transformar este 
programa algo estéril en presenta- 
ción, dada la sencillez que se preten- 
día, en una verdadera maravilla. 
Próximamente analizaremos más ór- 
denes para el manejo de cadenas al- 
fanuméricas, junto con programas 
ejemplo, breves y claros, que ilustren 
su uso. 
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10 REM * EL AHORCADO * 
20 REM JJ MARTIN PARA MICROHOBBY AM 
STRAD 
30 REM * EL AHORCADO * 
40 MODE O 
50 A$="AHORCADO":B$=SF'ACE$(15) 
60 er-r-or-es=O 
70 INPUT palabr-a$ 
80 palabr-a$=UPPER$(palabr-a$) 
90 CLS 
100 solucion$=pal
br-a$ 
110 lon=LEN(palabr-a$) 
120 'tr-élbajo$=STRING$(lon
 "-") 
130 LOCATE 8
20:PRINT tr-abajo$ 
140 IF TRABAJO$=SOLUCION$ THEN 350 
145 LOCATE 1
23:PRINT "PULSE UNA LE 
TRA" 
1 50 1 F 1 N
:
EY$< :>"" 1 HEN GOTO 150 
160 18tr-a$=INKEY$ 
170 IF letr-a$="" THEN 8010 160 
180 letr-a$=UPPER$(letr-a$) 
185 LOCATE 1
23:PRINT B$ 
190 ciichas$=dichas$ + "-" + letr-a$ 
200 LOCATE 1
4:PRINT dichas$ 
210 posi= INSTR(l
PALABRA$
letr-a$) 
220 IF POSi=O THEN GOTO 290 
230 MTD$(tr-abajo$
posi
l)=letr-a$ 
240 MID$(pal
br-a$
posi 
 U="*" 
250 LOCATE 8
20:PRINT tr-abajo$ 
260 pos i =. 1 NSTR ( 1 
 PAt..ABRAS 
 1 et r- a S) 
270 IF posi<:>O THEN 230 
280 GOTO 130 
290 REM-Ia letr-a no psta en la pal
 
br-a-- 
300 er-r-or-es=er-r-or-es+l 
310 fallo$=LEFT$(a$
er-r-or-es) 
320 LOCATE 1
1:PRINT falloS 
330 IF fallo$=a$ THEN STOP 
340 GOTO 145 
350 REM--Ia paJabr-a es encontr-ada-- 
360 LOCA TE 5
9:PRINT "MUY BIEN" 
370 END 


Poro que lus dedos 
no reolicen ellrobo¡o duro, M. H Al. '5. 
TRAD lo hace por r Todos loslls/odos que induyon 
este logo/¡po se encuenlron a lu dlSposlClOn en un cos' 
sel/e mensuol sol,Ólonoslo, 
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I Suscríbete ahora al 


I y benefíciate de un I 
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(Oferta válida sólo hasta el 28 de febrero de 1986) 
M icrohobby AMSTRAD te ofrece Microhobby AMSTRAD lo abona por ti. 
ahora una oportunidad Ahora puedes recibir Microbobby 
excepcional. Hasta el 28 de febrero AMSTRAD en tu domicilio durante 
de 1986 podrás suscribirte a nuestra todo un año por sólo 5.900 ptas., es 
revista sin tener que pagar el decir, 2.100 ptas. menos de su valor 
recargo correspondiente al real. 
Impuesto sobre el Valor Añadido. ¡APROVECHA ESTA OPORTUNIDADI 
.
 ------------ ---- 
 
RECORTA O COPIA ESTE CUPON y ENVIALO A HOBBY PRESS, S.A. APDO. DE CORREOS 232 ALCOBENDAS (MADRID) 
Deseo suscribirme a Microhobby AMSTRAD durante un año (50 números) por sólo 5,900 ptas., lo que me supone un ahorro de 2.100 I 
pesetas, I 
El primer n úmero que deseo recibir es el I 
I 
I 

 
I 
I 
I 
I 
I 
I 


NOMBRE 
APELLIDOS 
DOMICILIO 
CIUDAD PROVINCIA 
C. POSTAL TELEFONO PROFESION 
Marco con una (x) en el casillero correspondiente la forma de pago que más me conviene. 
O Talón bancario adjunto a nombre de HOBBY PRESS, S. A. 
O Giro Postal a nombre de HOBBY PRESS, S. A., N. o 
O Contra reembolso del primer envío 
O VISA N. o 
Fecha de caducidad de la tarieta 
O Domlciliación bancaria (50 NUMEROS MAS 1 DE REGALO) 
Banco Sucursal 
N, o de cuenta 


EDAD 


Si lo prefiere puede 
suscribirse por teléfono: 
(91) 654 28 98 


Localidad 


Firma y fecha 
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Hasta ahora hemos estado trabajando con bytes, o sea, 
números comprendidos entre el O y 255, que son los valores . 
máximos que podemos almacenar en un byte. 
Pues bien, en este capítulo vamos a hablar de ciertas 
instrucciones que nos van a permitir introducirnos en un byte y 
de e.fita forma poder examinarlo de una manera mucho más 
. exhaustiva. 
. ... ... ... ... ... . 
e 

\ O O O O O ( 
u.: \ 
... ... ... ... 
O O O O 
n número real- si el bit está puesto a uno, se le suma .. 
mente es un byte en formato binorio¡ el valor correspondiente a ese bit, y 
es decir, en forma de unos Y ceros, si está puesto a cero, se le suma ce- " 
que son los valores con los que tra- ro, y así obtenemos el número desea- 
', 
baja el microprocesador. Podemos do. El mayor número que podemos ' ' 

 
desgranar un byte en varios ceros y obtener de esta forma, es el 255 y ./ ... 
unos, a cada uno de estos valores se el menor es el cero, por eso un byte ... ... ... ... . 
les llamo bits, por lo que un bit úni- estará siempre comprendido entre )- ? 
comente puede tener un valor que esos dos valores, " O O O O O e 
puede ser un cero o un uno, 
Instrucción SET -< 

 ... O 1 4; 
Sistema binario U no de las instrucciones de trata- 
y bits miento de bits es la instrucción de O 1 
puesta a uno, o sea, pone el bit co- ,,: 
Un byte está compuesto por ocho rrespondiente del registro indicado a O 1 
bits que van del bit O que es el me- uno, Esta instrucción se representa ....... 
nos significativo hasta el bit 7 que es de la siguiente forma: -- 
el más significativo, Vamos a ver cuál i O 1 
es el valor de cada uno de estos bits SET b,r / 
dentro del byte: .. 
donde b puede ser cualquier bit del ! I ... ... ... ... ... . 
bit 7 bit 6 bit 5 bit 4 O al 7 del registro r (cualquiera de los 
128 64 32 16 registros simples B, C, D, E, H, L o O O O O O e 
bits 3 bit 2 bit 1 bit O A), Así pues la instrucción SET b,r 
8 4 2 1 pondrá a uno el bit b de r, I '- 
, 
Un ejemplo de funcionamiento de 
 
Algunos ejemplos de números re- esta instrucción lo tenemos en el pro- 
presentados en este formato serían: grama número uno; lo que hacemos " 
únicamente, es poner el bit 4 regris- ... 
tro B, a uno, independientemente del b ... 
128 10000000 ... 
valor que tuviera ese registro. O 
1 00000001 Ahora el programa número 2. Po- I O O 
129 10000001 ra entenderlo mejor, vamos a ver en 10 
255 11111111 I ' .... 
primer lugar la diferencia que existe '" "'-, A... " 
. 
...., 
O 00000000 entre los códigos de las letras mayús- ....... 
'-, "... "- , " 
culos y las minúsculas. Los códigos de , . 
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estas últimas van desde el 97 hasta 
el 122, y los códigos de las primeras 
van desde el 65 hasta el 90. Si nos 
fijamos en los códigos de las letras 
mayúsculas, veremos que en éstos, el 
bit 5 está siempre a cero, en cambio 
en los códigos de los letras minúscu- 
las el bit 5 siempre está puesto a uno. 
Así pues lo que hace el programa 2, 
es cargar en el acumulador el códi- 
go de una letra mayúscula, y luego 
pone a uno el bit 5 de ese código, 
por lo que esa letra mayúscula que- 
da convertida en minúscula, y luego 
la imprime en pantalla. 
Esta instrucción de puesta a uno, 
también puede actuar con el conte- 
nido de la posición de memoria indi- 
cada por HL, IX o IY. Esto lo pode- 
mos ver en el programa 3. Aquí lo 
que hacemos es poner a uno el bit 
3 de la posición de memoria indica- 
da por el registro doble H L. Así pues 
si la posición de memoria &7000, 
que es la que hemos cargado en HL, 
contenía un cero, después de la eje- 
cución del programo, esa posición 
de memoria contendrá un 8, pues el 
bit 3 de esa posesión de memoria 
contendrá un 1. 


Instrucción RES 


Vamos a ver ahora otra instrucción 
de manejo de bits, esta instrucción es 
la de puesta a cero y se representa 
de la siguiente forma: 
RES b,m 
b representa cualquier bit del O al 7 
del registro m. Este registro puede 
ser cualquiera de los registros simples 
H, L, D, E, B, e o A, o bien (HLL 
(IX+d) o (IY +d). 
Esta instrucción lo que hace es po- 
ner o cero el bit correspondiente del 
registro indicado. 
En el programa número 4 se da un 
ejemplo de esta instrucción, lo que 
hacemos es cargar el acumulador 
con uno y luego ponemos el bit O del 
acumulador a cero, con lo cual el 
acumulador se queda otra vez con 
cero. 
El programa número 5, es muy si- 
milar a uno visto anteriormente, pe- 
ro a la inversa: se carga el acumula- 
dor con la letra minúscula «a», y lue- 
go ponemos a cero el bit 5, con lo 
cual en el acumulador obtendremos 
el código de la letra mayúscula «A» 
y luego la imprimimos. 
Así pues, el manejo de la instruc- 
ción de puesta a cero es similar a la 
instrucción vista anteriormente de 
puesta a uno. 


e ódigp 
máquina 


Instrucción BIT 


Existe una última instrucción de ma- 
nejo de bits, que es la instrucción de 
prueba de bits. Esta es una instruc- 
ción muy interesante, ya que nos per- 
mite averiguar en cualquier momen- 
to, cuáles son los bits puestos a uno 
o a cero de un registro cualquiera. 
La instrucción de prueba de bits se 
representa de la siguiente manera: 


BIT b,r 


donde b es cualquier bit del O al 7 del 
registro r. Este registro puede ser 
cualquiera de los registros H, L, B, C, 
D, E o A. 
Tras la ejecución de esta instruc- 
ción, el flag Z (flag de cero) del re- 
gistro F, contendrá el complementa- 
rio del bit indicado dentro del regis- 
tro indicado. 
Así pues si ejecutamos la siguiente 
instrucción: 


BIT 2,A 


y el bit 2 del acumulador contiene un 
uno, el flag Z del registro F se pon- 
drá a cero. 
Si el bit 2 del acumulador fuese un 
cero, el flag Z se pondría a uno. 
El programa número 6 es un ejem- 
plo práctico del manejo de la instruc- 
ción de prueba de bits. Lo que hace 
es mirar si el bit 7 del acumulador es- 
tá puesto a uno, si es así vuelve al Ba- 
sic, de lo contrario pasa e incremen- 
to el contenido del acumulador. De 
este modo, el programa volverá al 
Basic cuando el contenido del acu- 
mulador sea exactamente 128, ya 
que éste es el valor correspondiente 
al bit 7. En ese momento el bit con- 
tendrá un uno y el flag Zedel regis- 
tro F contendrá su complementario, 
o sea un cero. 
Volvamos de nuevo al problema 
de las letras mayúsculas y minúscu- 
las; como hemos dicho, las primeras 
contienen en el bit 5 un cero y las úl- 
timas contienen en dicho bit un uno. 
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Así pues el programa número 7, lo 
que hace es comprobar si un código 
de una letra dada, corresponde a 
una letra mayúscula o minúscula¡ pa- 
ra ello, se chequea el bit 5 del códi- 
go de dicha letra, si en dicho bit hay 
un uno, entonces el flag Z del regis- 
tro F contendrá 
n cero, lo que que- 
rrá decir que la letra en cuestión es 
minúscula. Si por el contrario el bit 
5 de dicho código contiene un cero, 
el flag Z contendrá un uno, por lo 
que la letra en cuestión será ma- 
yúscula. 
Así pues si en la línea 10 de este 
programa, cargamos el acumulador 
con el código de una letra mayúscu- 
la, al ejecutarlo se imprimirá en pan- 
talla una «M», si por el contrario car- 
gamos el código de una letra minús- 
cula, nos aparecerá una «m» en pan- 
talla, 
Con esta instrucción también pode- 
mos chequear los bits que componen 
una posición de memoria. Esta posi- 
ción de memoria la deberemos car- 
gar en los registros dobles HL, IX o 
bien IY. 
En el programa 8 cargamos el re- 
gistro indexado IX con la posición de 
memoria &7000, luego con la Ins- 
trucción: 


BIT 1, (IX+ 1) 


comprobamos si el bit 1 de la posi- 
ción de memoria &7001 está puesto 
a uno o a cero, Si ese bit está a uno, 
el flag Z contendrá un cero y el pro- 
grama imprimirá en pantalla un uno. 
Si por el contrario el bit 1 de esa po- 
sición de memoria contiene un cero, 
el flag Z contendrá un uno y el pro- 
grama nos imprimirá un cero, 
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Como hemos visto hasta ahora, 
con esta instrucción de prueba de 
bits, podemos chequear los diferen- 
tes bits de cualquier registro o posi- 
ción de memoria. Así pues con dicha 
instrucción podemos desgranar to- 
dos los bits de cualquier registro y co- 
nocer de este modo cuáles están 
puestos a uno y cuáles están puestos 
a cero. 
El programa número nueve apro- 
vecha esta posibilidad de la instruc- 
ción de chequeo de bits para conver- 
tir un número decimal dado a binario, 
En primer lugar, dicho programa 
carga en el registro par HL con la po- 
sición de memoria &7000. en dicha 
dirección será donde nosotros debe- 
remos colocar el número decimal 
que deseemos pasar a binario. Esto 
lo podemos hacer mediante la ins- 
trucción Basic: 


POKE &7000, n 


donde n será el número decimal de- 
seado, que deberá estar comprendi- 
do entre O y 255. 
A continuación el programa irá 
chequeando cada uno de los bits que 
componen esa posición de memoria. 
Si el bit chequeado contiene un ce- 
ro, el programa hará que se impri- 
ma un cero en pantalla y por el con- 
trario el bit chequeado contiene un 
cero, el programa hará que se impri- 
ma un uno en pantalla. Y así hasta 
terminar la lectura de los ocho bits 
que componen un byte. De esta for- 
ma tan sencilla habremos consegui- 
do pasar un número decimal dado a 
forma binaria, 
El programa anterior, como ha- 
bréis visto no puede transformar a 
binario un número superior a 255, 
pero esto no representa ningune di- 
ficultad, ya que si en lugar de che- 
quear los bits de una posición de me- 
moria, chequeáramos los bits de dos 
posiciones de memoria consecutivas, 
lograríamos pasar a binario un nú- 
mero comprendido entre O y 65535, 
Por último decir que las instruccio- 
nes de puesta a uno y puesta a ce- 
ro, es decir, las instrucciones: 


. 
. 


SET b,r 
RES b,r 
no afectan a ningún flag del registro F. 
Por el contrario la instrucción de 
prueba de bits, o sea la instrucción: 


BIT b,r 


--.... 


afecta únicamente al flag Z del regis- 
tro F, 


PROGRAMAS 


8' , 
R(I(', rr'F 
A J? re:" 


8(1(1(1 
8(1(1t
 ",Ea11 
ACI(l:-' r.BFF 
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SET 5. A 
CAL L ttB8:'JA 
Rfl 


ORG ..SOOO 
LO HL...700( 
SE T -. (HL) 
RLT 


Of'G ..80(1(1 
LO A,I 
RES O. A 
F;ET 
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JR 
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LO A, "en" 
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.JR Z. ( Er.;{1 
LDA. '1 ' 
CAll "BE-
tl 
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ORG "S(lnn 
LD HL.1t711t')) 

IT 7. (HlJ 
CALL MIRAr« 
811 6. (Hl ) 
CALL MIRAR 
BIT 5. (HL) 
CALL MI RAr< 
F<IT 4. (HU 
CALL MIRAR 

IT -" (HL) 
CALL MIRAr< 
(<1T Z. (HU 
CALL MIRAR 
£.¡1T 1, (HL) 
CALL MIRAR 
[qT O. (Hl) 
CALL MIRAr« 
F;ET 
rAll 7, CERO 
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F;ET 
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SOFTWARE: 


Por cada programa G RA TIS i ¡1 bolígrafo con reloj de cuarzo!! 
2.300 ptas. EXPLOIDING FIST 2.300 ptas. 
2.495 ptas. FIGHTER PILOT 1.975 ptas, 
1.950 ptas. MASTER OF T. LAMP 1.950 ptas. 
1,650 ptas. NIGHTSHADE 1,950 ptas. 
1.950 ptas. HACKER 1.950 ptas, 
1.750 ptas. MAPGAME 2.700 ptas. 


1 


RAID 
JUMP JET 
TALES OF ARABIAN 
SABREWULF 
GHOSTBUSTERS 
HIGHWA y ENCOUNTER 


I 
) 
I 
! 
I 


IMPRESORAS 
ii 20 % DE DESCUENTO SOBRE P,V,P.!! 


LAPIZ OPTICO 
ii4.900 ptas.!! 


YOYSTICK QUICK SHOT 11 
JOYSTICK QUICK SHOT V 


2.395 ptas. 
2.795 ptas. 


CASSETTE ESPECIAL 
ORDENADOR 5.295 ptas. 


TOSHIBA MSX 64 K 
i ¡34.900 ptas.!! 


CINTA C-15 ESPECIAL ORDENADOR 
DISKETTE 3" 


85 
990 


PC-COMPATIBLE IBM 256 K 
MONITOR FOSFORO VERDE 
2 BOCAS DISKETTE 360 K 
SOLO i ¡243.900! I 


PC-PORTATIL 
2 BOCAS 360 K 
i i 174.900!! 


TAPA METACRILATO PARA 
TECLADO i ¡2,300 ptas.!! 


PRECIOS SUPER-EXCEPCIONALES PARA 
AMSTRAD CPC-472 y CPC-6128 
iiLLAMANOS, TE ASOMBRARAS!! 


- . 


o 
I 


SINTETIZADOR DE VOZ 
i i 8 .495 ptas.!! 


I 
J 
I 
I 
I 
¡ 
l 


UNIDAD DE DISCO CON 
CONTROLADOR: 49.900 


LIBROS: 
Curso autodidáctico Basic I 
Curso autodidáctico Basic II 
Programando con Amstrad 
Juegos sensacionales Amstrad 
Hacia la inteligencia artificial 
Música y sonidos con Amstrad _ 


MODULADOR TV 
8.400 ptas. 


INTERFACE DISCO 
5 1/4" 5.300 


2,525 ptas. 
2.525 ptas. 
2.195 ptas. 
1.950 ptas. 
1.295 ptas. 
995 ptas. 


IMPRESORA MARGARITA 
i ¡49.900 ptas,!! 


Pedidos contra reembolso sin ningún gasto de envío. Tels. (91) 27596 16/2745380 o escribiendo a Micro-l. 
C/ Duque de Sesto, 50. 28009 Madrid. 
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in duda 
alguna 


A través de esta sección se pre- 
tende resolver, en lo medida de lo 
posible, todos los posibles dudas 
que «atormenten)) a todas las 
personas interesadas en el mundo 
del AMSTRAD, sean o no poseedo- 
res de uno y, si lo son, se encuen- 
tren en cualquier nivel de destreza 
en su manejo. 
Semanalmente, aparecen en estas 
páginas las consultas de la mayor 
cantidad de usuarios posible; ello re- 
dundará en un mejor servicio y en 
un contacto más estrecho entre to- 
dos nosotros a través de la revista. 
SIN DUDA ALGUNA está 
abierta a todos. 


Tengo desde junio un 664, y qui- 
siera saber dónde están las famosas 
64 K RAM, porque el ordenador res- 
ponde que tiene 40,25. 
También querría conocer si los 
programas del 6128 y del 8256 se- 
rían compatibles con el mío caso de 
instalar la ampliación de memoria 
que anunciáis en vuestro n. o 10 (los 
programas del 6128 en la amplia- 
ción de 128 K Y los del 6128 y 8256 
en la de 256 K). 
Otra cosa: ¿por qué son mejores 
los procesadores de 16 bits?, porque 
siempre os estáis metiendo con los 8 
bits del Z80. 
Por último, dedicar a Amstrad un 
efusivo corte de mangas, por su 
6128, naturalmente, y otro a INDES- 
COMP, por su precio de venta. Des- 
de luego, una broma de mal gusto. 


Antonio Garda (Barcelona) 
Hay que distinguir entre la memo- 
ria total de un ordenador y la memo- 
ria disponible para el usuario. 
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En el caso del Amstrad, el sistema 
operativo , el firmware y otras cosos 
también ocupan memorial por lo que 
sólo te quedan para programas Ba- 
sic los Kbytes que indica la orden 
PRINT FRE (O). 
De todas maneras , piensa que tu 
Amstrad maneia más de 64 Kbytes , 
sólo que no de una vez. En efecto , 
las cuarenta y pico libres , más las 32 
de ROM suman más de 64. La publi- 
cidad , por razones obvias , omite es- 
ta explicación referente a las diferen- 
cias entre memoria total y libre para 
el usuario. 


Una vez ampliado tu 664, debie- 
ra ser absolutamente compatible con 
el 6128 a nivel de programas Basic 
y a nivel de CPIM. 
En cuanto a los programas para el 
8256 1 los programas para esta má- 
quina que corren baio CPIM + de- 
ben ser compatibles con mínimos 
cambios. A nivel de programas Ba- 
sic , olvídate. El Basic del 8256 no tie- 
ne nada que ver con el de la serie 
Cpc. 
Los procesadores de 16 bits son 
meiores que los de 8 bits , así , en abs- 
tracto , por tres razones: 
a} Pueden direccionar mucha más 
memoria sin paginarla. 
b} Su capacidad de cálculo es mu- 
cho mayor porque son capaces de 
maneiar números más grandes. 
c} Son mucho más rápidos que los 
de 8 bits, aunque esto depende del 
diseño del ordenador que lleve uno 
de estos procesadores. 
Los procesadores de 8 bits , como 
el Z80 , pueden imitar las prestacio- 
nes de los otros , pero a costa de una 
notable disminución de velocidad. 


Cuando copio un programa y es- 
cribo mal una variable como por 
ejemplo: escore$ en vez de score$, 
el programa no funciona. Entonces 
me gustaría saber: 
¿Hay alguna forma de hacer que 
el ordenador lo indique, o que en su 
defecto liste todas las variables, pa- 
ra de esa forma poder saber si hay 
alguna mal escrita, o algo pareci- 
do...? 


Por desgracia , no existe una ma- 
nera sencilla de hacer lo que preten- 
des. En otros ordenadores , como el 
Spectrum por eiemplo, cuando usas 
una variable que no existe aparece 
en la pantalla el mensaie de «VARIA- 
BLE NOT FOUNO» o algo parecido , 


pero el Amstrad, cuando encuentro 
una variable por primera vez que no 
está inicializoda , la da el valor cero 
o cadena vacía según sea numérica 
o de cadena , automáticamente. 
Para crear un comando que lista- 
ra todas las variables , sería necesa- 
rio recurrir al código máquina, al sis- 
tema RSX. En numerosos artículos de 
AMSTRAD Semanal encontrarás in- 
formación acerca de cómo hacerla. 


AlI'Istrad Ideas 


AMSTRAD Semanal comunica a todos 
sus lectores la apertura de una nueva sec- 
ción dedicada a recoger las mejores ideas 
que exploten al máximo las posibilidades 
del ordenador, materializadas en progra- 
mas claros y cortos (máximo 25 líneas). Los 
mejores de entre todos ellos serán publi- 
cados con el nombre de su autor en la re- 
vista, recibiendo como premio, gratuita- 
mente en su domicilio 105 cuatro primeros 
números de nuestra cinta mensual. Los pro- 
gramas enviados deberán incluir: 
- Cinta de cassette con el pro. 
grama o programas grabados. 
- Explicación detallada del 
funcionamiento y propósito del 
programa, mecanografiado a 2 
espacios o con letra clara, 
Es imprescindible indicar en el sobre cla- 
ramente: AMSTRAD IDEAS. 
La dirección es: 
Hobby Press, S, A, 
La Grania, s/n, 
Polígono Industrial de Alcobendas, 
Madrid 



 


iOperación cambio! 


Va/oramos: 
Tu AMSTRAD 464 en 50.000 ptas. 
Un Spedrum+ en 30.000 ptas. 
Amstrad CPC 664 en 70.000 ptas. 
En la compra del AMSTRAD CPC 6128 
o PCW 8256. 
Consulte para monitor color. 
Precios espeda/es en impresoras y ac- 
cesorios. 
'Z" Tardes 270 34 97. 
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1 PROCESADOR DE TEXTOS 
ildeal para escribir cartas e informes! 
Características: Visualización continua del 
tiempo. Contador de palabras (indicando 
las palabras por minuto) . Texto normal o 
doble, en pantalla o impresora, 
2 HOJA DE CALCULO 
iUtiliza tu micra para controlar tus cuentas! 
Características: Cifras visualizadas en filas 
y columnas. Actualización permanente · 
Actualización reflejada instantáneamente 
en toda la hoja. Grabación de los 
resultados para futuras modificaciones, 
3 GRAFICOS 
iConvierte esos números en maravillosos 
gráficos! Características: Gráficos de barras 
en tres dimensiones. Gráficos de pastel · 
Histogramas, 
4 BASE DE DATOS 
ilgual que los archivos de la oficina! 
Características: Cargar ficheros con solo 
pulsar una tecla. Clasificación · 
Modificación. Listados. Búsqueda, 
* En Castellano 
*Servimos en 
48 Horas 
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I Envíenos a MICRO BYTE I 
--1 P,o Castellana, 179, 1," - 28046 MADRID I 
" B C D E F G H I J 
 L Mil 
I : Nombre I 
* . _ . I A p ellidos I 
Verslon disCO AMSTRAD PVP, 3.900 ptas. I Dirección I 
,1 Pobloclón I 
1 D, P Teléfono 1, 
I 
I 
I 
I 
I 
SENALADO l 
O AMSTRAD O COMMODORE O SPECTRUM 
O AMSTRAD VERSION DISCO 
Sin gastos de envío 


Deseo que me envíenD ejemplar/es 
del programa MINI OFF ICE 
PARA El MICROORDENADOR 


r .' 
l. 
I 


INCLUYO TAlON NOMINATIVO 
CONTRA. REEMBOLSO 


O 
O 


-' 
;... '.\ 


Pedidos por teléfono 
91 - 442 54 33/44 



M · rca
a 
camun 


Con el objeto de fomentar las rela- 
ciones entre los usuarios de AMSTRAD 
MERCADO COMUN te ofrece sus Pági: 
nos para publicar los pequeños anuncias 
que relacionadas con el ordenador y su 
mundo se ajusten al formato indicado a 
continuación. 
En MERCADO COMUN tienen cabida 
anuncios de ventas, compras, clubs d
 
usuarios de AMSTRAD, programadores, 
y en general cualquier clase de anuncio 
que pueda servir de utilidad a nuestros 
lectores. 
Envíanas tu anuncio mecanografiado 
a: HOBBY PRESS, S,A. 
AMSTRAD SEMANAL. 
Apartado de correos 54.062 
28080 MADRID 
¡ABSTENERSE PIRATAS! 


Cambio programas comerciales, 
últimas novedades. Interesados 
llamar al Tel. (91) 478 12 15. 
Preguntar por Alejandro. 


................. 


Vendo Amstrad CPC-664 con 
monitor de fósforo verde. Nuevo. 
Con garantía oficial. Regalo 
Pascal en disco. Por 89.000 ptas. 
Tel, (960) 285 17 84 de Oliva 
(Va/encia). Preguntar por Pedro. 
Transportaría a cualquier punto 
de la provincia de Valencia. 


................. 


Vendo Amstrad 464, monitor 
fósforo. En garantía. Regalo 
juegos y manuales de uso y Basic 
Amstrad, 55.000 ptas. Eduardo 
Ruiz de Velasco. Tel. 
(91) 204 52 76, 


................. 


34 MICKOHOBBY AMSTRAD 


Desearía contactar con usuarios 
del Amstrad para intercambio de 
programas, sobre todo de 
utilidades. Los interesados escribir 
a: Orlando Alonso Martínez. Ed. 
«A Casiña» l. ° Fase, Portal 2 - 
3, o dcha. Las Lagunas (Orense) , 
................. 


Vendo Amstrad CPC 664, 
monitor color con sus programas, 
más 4 disquetes y conectar de 
casset de regalo por sólo 112.000 
pts, con garantía, Tel. 
(977) 32 03 13, 


................. 


Deseo comprar un Amstrad 464 
de segunda mano con monitor en 
fósforo verde o en color, 
interesados llamar al T el. 
705 03 57 de Madrid, De 17 a 20 
horas. 


................. 


Cambio monitor fósforo verde 
GT-64 y alimentador/modulador 
MP-l, por monitor color CTM-640. 
Abono diferencia precio. 
Fernando Corredera . Tel. 
759 25 28. Madrid. 


................. 


Vendo el siguiente lote de 
progra mas al precio de 2.750 
pts.: Decathlon, Easi-amsword 
(Procesador de textos), Fred, 
roland in then caves The Galactic 
plage, Harrier aHack, Llamar al 
Tel. (976) 34 6195, O escribir a 
Joaquín López Vela. C! Parque de 
Roma, F-l - 8-G. 50010 
Zaragoza. 


................. 


Urge vender Amstrad CPC-464 
por cambio de ordénador, regalo 
programas de facturación y 
control de stocks y libro de 
juegos, precio a convenir, es con 
pantalla de fósforo verde, y está 
comprado en junio. Estoy en el 
Tel. (964) 47 15 80 de Benicarló 
(CS), Preguntar por Jordi de 2 a 4. 


................. 


Queremos deshacernos de unos 
f)rogramas entre ellos el 
Exploding-Fist, Souther Belle, 
Knight Lore. Nos gustaría 
venderlos o cambiarlos: Estamos 


interesados por el Pole Position. 
Llamadnos al Tel, (988) 75 1602, 
C! Avda, Gral. Goded, 23 - 3,0 
C. 34005 Palencia. Preguntad por 
José. 


................. 


«Vendo, por cambio de equipo, 
Spectrum Plus en perfecto 
funcionamiento, con todos sus 
accesorios, y más de 50 
programas comerciales en cintas, 
todo por 26.000 pts. Llamad al 
Tel. (923) 2491 86. Jesús. 


................. 


«Deseo comprar impresora 
compatible con un Amstrad 664, 
en buen estado. T el, 
(93) 236 03 15. «Juan Antonio». 
................. 
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-- 


ZURBANO, 4
410 47 63 
28010 MADRID 


................. 


Desearía cambiar el DALEY 
THOMPSONS DECATHLON 
(original), por uno de estos 
programas: 
Exploding fist. 
Rocki o Frank Bruno's Boxing. 
Beach Head. 
Tenis. 
Knight Lore. 
Pole Position, 
Raid over Moscow. 
Dragontore. 
Southern Belle. 
También me interesarían 
algunos otros títulos. Interesados 
llamar a: José María Crespo. C! 
Jaime Fabré, 2 _10. 0 _1.°. 08019 
Barcelona. T el. 305 69 28. 


................. 


Vendo Amstrad 464-F verde con 
modulador MP-l para televisión 
color y B. & N., 24 juegos 



máquma te permItirá manejar el sonido y 
la música en tu Amstrad desde Basic, 
mediante un nuevo juego de comandos 
creados especialmente para ello. 


CROSS 


Tienes cuatro revólveres para destruir a 
tus enemigos en el mínimo tiempo posible, 
Necesitarás toda tu habilidad, rapidez de 
reflejos y suerte, mucha suerte. 


JUMPER 


Debes alcanzar la cima del Valle de las 
Cintas Deslizantes, Tienes que saltar por 
los huecos de las vallas, que se 
desplazarán a derecha e izquierda con 
una rapidez de vértigo, 


MAGGOT 


Te encuentras en la amable tierra de las 
setas gigantes. Tu misión es guardarla del 
ataque y la invasión de una peligrosísima 
serpiente polimórfica que las ataca sin 
piedad. 


. 


TIMEBOMB 


I 
, 


Una organización terrorista de Oriente 
Medio ha colocado una bomba de tiempo 
en el laberinto de defensa del Laboratorio 
de investigación bacteriológica de 
Lexington. 


RSX 


y our Computer ha pensado en los usuarios 
del Amstrad CPC464 y ha creado un 
nuevo juego de comandos completo para 
tu ordenador, de forma que el Basic así 
ampliado no tenga nada que envidiar al de 
los otros modelos de la serie. 
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HOBBY PRE5S,S.A. 
Apartado de Correos N. o 232 
ALCOBENDAS 
(Madrid) 


- 


J U
W 


EL CORAZON DE LA PRIMERA REVISTA EUROPEA DE ORDENADORES 
AMSTRAD , . 


464.664-6128 
La mejor selección de programas 
de juegos y utilidades. publicados 
en la revista de mayor difusión 
de Europa en ordenadores, 
Ahora reproducidos en 
cassette, en auténtica 
exclusiva mundial. 


695.- 
1 PTAS. 
0/\ 


I 


, c.
o!l!l 
'1. 
út1\
e( 

 I'I\09Ido\ 
 
\-.
 
...,_..n 
. A 1"- 
\ ,\\I"\c. O 
.....
 
 . 
Las cir elS de YDI/, ' \ é \', ,f 
Comr tBr se 
d ',U , 
me' 4u.lmonr ppra 
 ,., . 

 , Itred, S{, crrill1 y \ J ' O 
Jommodorl ." l' \J 
EÑ 


&
 
. ,

(p;¡...:J.'j.., 
. 
/ . I),
 

' 

\) 
\
'I-
 


.\ 



. 

,
 
 
.A
 q¡ c,-,q¡ 
'\ V' t>'6 


Si no lo encontrara en su kiosco, puede solicitarlo directamente a nuestra editorial: 
S, L Paseo de la Castellana, 268. Te!.: (91) 733 25 99. 28046 Madrid. 
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SOLICITUD DE CINTAS DE PROGRAMAS 


Oferta válida hasta el 28 de febrero de 1986. 


Deseo recibir en mi domicilio, al precio de 756 ptas, (IV A incluido), las 
siguientes cintas con los programas publicados por Microhobby AMSTRAD. 
Marco con una (x) la(
 cinta(s) que deseo: 
O Cinta n, 1 (contiene programas publicados en revistas 1 014 inclusive), 
O Cinta n. o 2 (contiene programas publicados en revistas 5 al 8 inclusive). 
NOTA: O Cinta n. o 3 (contiene programas publicados en revistas 9 0112 inclusive). , 
Por razones administra.ti- ., O Cinta n, o 4 (contiene programas publicados en revistas 13 al16 inclusive). 
vos, no pad
mos admltlf sa/¡cltu. O Cinta n, o 5 (contiene programas publicados en revistas 17 al20 inclusive). 
des de envIo de cmtas con paga contra O Cinta n. o 6 (contiene programas publicados en revistas 210140 inclusive). 
_ ree'}Jbolsa o rarleta de 
red¡/a. Par favor, envIo O Cinta n, o 7 (contiene programas publicados en revistas 41 0160 inclusive). 
talan par el Imparte a glfo postal. O C ' o 8 ( . bl ' d ' 61 180 ' I . ) 
Silo forma de paga elegida es talón bancoria, remíteloiunta can ,"ta n. contiene programas pu Ica os en revistas a InC uSlve , 
este cupón en un sobre cerrado a lo misma dirección. 
las cintas de programas se editan una coda mes. Si solicitas varias, las recibirós sucesivamente, conforme sean editados. No se cobran gastas de envío par los cmtas. 


e NOMBRE 
on el 01 APELLIDOS 
ciones entre I DOMICILIO 
MERCADO C CIUDAD PROVINCIA 
nas para publ C. POSTAL TELEFONO PROFESION 
que relacio
d ¿ERES SUSCRIPTOR DE MICROHOBBY AMSTRAD? N. o DE SUSCRIPTOR (si lo recuerdas) 
mundo se alu M ( ) I ' 11 d ' I f d . . 
. . . arco con una x en e casI ero correspon lente a orma e pago que mas me conviene. 
contrnuaclon. [J Talón bancario adiunto a nombre HOBBY PRESS, S. A. 
En MERCAL O Giro Postal a nombre de HOBBY PRESS, S. A" N. o Firma y fecha: 
anuncios de \ 
usuarios de A. 
y en general cualquier clase de"anuncio 
que pueda servir de utilidad a nuestros 
lectores. 
Envíanos tu anuncio mecanografiado 
a: HOBBY PRESS, S.A. 
AMSTRAD SEMANAL. 
Apartado de correos 54.062 
28080 MADRID 
¡ABSTENERSE PIRATAS! 


Cambio programas comerciales, 
últimas novedades. Interesados 
llamar al Tel. (91) 4781215. 
Preguntar por Alejandro. 


................. 


Vendo Amstrad CPC-664 con 
monitor de fósforo verde. Nuevo. 
Con garantía oficial. Regalo 
Pascal en disco. Por 89.000 ptas. 
T el. (960) 285 17 84 de Oliva 
(Valencia). Preguntar por Pedro. 
Transportaría a cualquier punto 
de la provincia de Valencia. 


................. 


Vendo Amstrad 464, monitor 
fósforo. En garantía. Regalo 
juegos y manuales de uso y Basic 
Amstrad, 55.000 ptas. Eduardo 
Ruiz de Velasco. Tel. 
(91) 204 52 76. 


................. 


34 MlaOHOBBY AMSTRAD 


/U:::> U,j ;J/ ae ¡Vlaarla. ue l' u LV 
horas. 


................. 


Cambio monitor fósforo verde 
GT-64 y alimentador/modulador 
MP-1, por monitor color CTM-640. 
Abono diferencia precio. 
Fernando Corredera. Tel. 
759 25 28. Madrid. 


................. 


Vendo el siguiente lote de 
programas al precio de 2.750 
pts.: Decathlon, Easi-amsword 
(Procesador de textosL Fred, 
roland in then caves The Galactic 
plage, Harrier attack. Llamar al 
T el. (976) 34 61 95. O escribir a 
Joaquín López Vela. CI Parque de 
Roma, F-1 - 8-G. 50010 
Zaragoza. 


................. 


Urge vender Amstrad CPC-464 
por cambio de ordénador, regalo 
programas de facturación y 
control de stocks y libro de 
juegos, precio a convenir, es con 
pantalla de fósforo verde, y está 
comprado en junio. Estoy en el 
Tel. (964) 47 15 80 de Benicarló 
(CS). Preguntar por Jordi de 2 a 4. 


................. 


Queremos deshacernos de unos 
Ixogramas entre ellos el 
Exploding-Fist, Souther Belle, 
Knight Lore. Nos gustaría 
venderlos o cambiarlos: Estamos 
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· Clases de Informática 
sobre AMSTRAD 
En grupos o individuales 
Ordenadares AMSTRAD y 
periféricos 
Los meiores precios 
· Software a la medida 


-- 


ZURBANO, 4
410 47 63 
28010 MADRID 


................. 


Desearía cambiar el DALEY 
THOMPSONS DECATHLON 
(original), por uno de estos 
programas: 
Exploding fist. 
Rocki o Frank Bruno's Boxing. 
Beach Head. 
Tenis. 
Knight Lore. 
Pole Position. 
Raid over Moscow. 
Dragontore. 
Southern Belle. 
También me interesarían 
algunos otros títulos. Interesados 
llamar a: José María Crespo. CI 
Jaime Fabré, 2 - 10. 0 -1.°.08019 
Barcelona. Tel. 305 6928. 


................. 


Vendo Amstrad 464-F verde con 
modulador MP-1 para televisión 
color y B, & N., 24 juegos 
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Este mes: 


W!JifJ
 


Te ofrece algo realmente sabroso: 


MUSICA 


Este magnífico programa escrito en código 
máquina te permitirá manejar el sonido y 
la música en tu Amstrad desde Basic, 
mediante un nuevo juego de comandos 
creados especialmente para ello. 


CROSS 


Tienes cuatro revólveres para destruir a 
tus enemigos en el mínimo tiempo posible. 
Necesitarás toda tu habilidad, rapidez de 
reflejos y suerte, mucha suerte. 


JUMPER 


Debes alcanzar la cima del Valle de las 
Cintas Deslizantes. Tienes que saltar por 
los huecos de las vallas, que se 
desplazarán a derecha e izquierda con 
una rapidez de vértigo. 


MAGGOT 


I 

 


Te encuentras en la amable tierra de las 
setas gigantes. Tu misión es guardarla del 
ataque y la invasión de una peligrosísima 
serpiente polimórfica que las ataca sin 
piedad. 


TIMEBOMB 


Una organización terrorista de Oriente 
Medio ha colocado una bomba de tiempo 
en el laberinto de defensa del Laboratorio 
de investigación bacteriológica de 
Lexington, 


RSX 


Your Computer ha pensado en los usuarios 
del Amstrad CPC464 y ha creado un 
nuevo juego de comandos completo para 
tu ordenador, de forma que el Basic así 
ampliado no tenga nada que envidiar al de 
los otros modelos de la serie. 
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l EL CORAZON DE LA PRIMERA REVISTA EUROPEA DE ORDENADORES 
AMSTRAD /- 


464-664-6128 
La mejor selección de programas 
de juegos y utilidades, publicados 
en la revista de mayor difusión 
de Europa en ordenadores, 
Ahora reproducidos en 
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